/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / admin / roa / !RoA / !RunImage

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1e f4 20 3e 21 | 52 75 6e 49 6d 61 67 65 |..... >!|RunImage|
|00000010| 20 20 56 65 72 73 69 6f | 6e 20 31 2e 32 31 0d 00 |  Versio|n 1.21..|
|00000020| 14 42 50 72 69 6e 74 46 | 69 6c 65 25 3d a3 3a 44 |.BPrintF|ile%=.:D|
|00000030| 61 74 61 46 69 6c 65 25 | 3d a3 3a 71 75 69 74 25 |ataFile%|=.:quit%|
|00000040| 3d a3 3a 4d 61 6b 65 4e | 6f 25 3d b9 3a 52 6f 41 |=.:MakeN|o%=.:RoA|
|00000050| 66 69 6c 65 25 3d a3 3a | 50 6f 6c 6c 32 25 3d a3 |file%=.:|Poll2%=.|
|00000060| 0d 00 1e 0e ee 20 85 20 | f2 65 72 72 6f 72 0d 00 |..... . |.error..|
|00000070| 28 0f 63 72 24 3d bd 31 | 30 2b bd 31 33 0d 00 32 |(.cr$=.1|0+.13..2|
|00000080| 12 4c 69 6e 65 4d 61 72 | 6b 65 72 25 3d 31 33 0d |.LineMar|ker%=13.|
|00000090| 00 3c 16 f2 69 6e 69 74 | 69 61 6c 69 73 65 50 72 |.<..init|ialisePr|
|000000a0| 65 57 69 6d 70 0d 00 46 | 16 ee 20 85 20 f2 77 69 |eWimp..F|.. . .wi|
|000000b0| 6d 70 65 72 72 6f 72 28 | f6 24 29 0d 00 50 17 f2 |mperror(|.$)..P..|
|000000c0| 69 6e 69 74 69 61 6c 69 | 73 65 50 6f 73 74 57 69 |initiali|sePostWi|
|000000d0| 6d 70 0d 00 5a 16 ee 20 | 85 20 f2 77 69 6d 70 65 |mp..Z.. |. .wimpe|
|000000e0| 72 72 6f 72 28 f6 24 29 | 0d 00 64 09 f2 70 6f 6c |rror(.$)|..d..pol|
|000000f0| 6c 0d 00 6e 0e f2 63 6c | 6f 73 65 64 6f 77 6e 0d |l..n..cl|osedown.|
|00000100| 00 78 05 e0 0d 00 82 04 | 0d 00 8c 0b dd 20 f2 70 |.x......|..... .p|
|00000110| 6f 6c 6c 0d 00 96 08 20 | 20 20 f5 0d 00 a0 22 20 |oll.... |  ...." |
|00000120| 20 20 20 20 20 e7 20 49 | 6e 66 6f 4f 70 65 6e 25 |     . I|nfoOpen%|
|00000130| 20 8c 20 f2 63 6c 6f 73 | 65 69 6e 66 6f 0d 00 aa | . .clos|einfo...|
|00000140| 25 20 20 20 20 20 20 c8 | 99 20 57 69 6d 70 5f 50 |%      .|. Wimp_P|
|00000150| 6f 6c 6c 25 2c 30 2c 62 | 6b 25 20 b8 20 66 6c 61 |oll%,0,b|k% . fla|
|00000160| 67 25 0d 00 b4 14 20 20 | 20 20 20 20 c8 8e 20 66 |g%....  |    .. f|
|00000170| 6c 61 67 25 20 ca 0d 00 | be 2b 20 20 20 20 20 20 |lag% ...|.+      |
|00000180| 20 20 20 c9 20 31 20 20 | 20 20 20 3a 20 f2 72 65 |   . 1  |   : .re|
|00000190| 64 72 61 77 5f 77 69 6e | 64 6f 77 28 21 62 6b 25 |draw_win|dow(!bk%|
|000001a0| 29 0d 00 c8 30 20 20 20 | 20 20 20 20 20 20 c9 20 |)...0   |      . |
|000001b0| 32 20 20 20 20 20 3a 20 | c8 99 20 57 69 6d 70 5f |2     : |.. Wimp_|
|000001c0| 4f 70 65 6e 57 69 6e 64 | 6f 77 25 2c 30 2c 62 6b |OpenWind|ow%,0,bk|
|000001d0| 25 0d 00 d2 29 20 20 20 | 20 20 20 20 20 20 c9 20 |%...)   |      . |
|000001e0| 33 20 20 20 20 20 3a 20 | f2 63 6c 6f 73 65 77 69 |3     : |.closewi|
|000001f0| 6e 64 6f 77 28 21 62 6b | 25 29 0d 00 dc 1f 20 20 |ndow(!bk|%)....  |
|00000200| 20 20 20 20 20 20 20 c9 | 20 36 20 20 20 20 20 3a |       .| 6     :|
|00000210| 20 f2 62 75 74 74 6f 6e | 73 0d 00 e6 1f 20 20 20 | .button|s....   |
|00000220| 20 20 20 20 20 20 c9 20 | 31 37 2c 31 38 20 3a 20 |      . |17,18 : |
|00000230| f2 72 65 63 65 69 76 65 | 0d 00 f0 0e 20 20 20 20 |.receive|....    |
|00000240| 20 20 20 20 20 cb 0d 00 | fa 11 20 20 20 20 20 20 |     ...|..      |
|00000250| fd 20 71 75 69 74 25 0d | 01 04 08 20 20 20 e1 0d |. quit%.|...   ..|
|00000260| 01 0e 04 0d 01 18 14 dd | 20 f2 72 65 70 6f 72 74 |........| .report|
|00000270| 28 74 65 78 74 24 29 0d | 01 22 1f 20 20 20 20 24 |(text$).|.".    $|
|00000280| 62 6b 25 3d 22 52 65 70 | 6f 72 74 20 66 72 6f 6d |bk%="Rep|ort from|
|00000290| 20 21 52 6f 41 22 0d 01 | 2c 22 20 20 20 20 c8 99 | !RoA"..|,"    ..|
|000002a0| 20 57 69 6d 70 5f 43 6f | 6d 6d 61 6e 64 57 69 6e | Wimp_Co|mmandWin|
|000002b0| 64 6f 77 25 2c 62 6b 25 | 0d 01 36 0f 20 20 20 20 |dow%,bk%|..6.    |
|000002c0| f1 20 74 65 78 74 24 0d | 01 40 20 20 20 20 20 c8 |. text$.|.@     .|
|000002d0| 99 20 57 69 6d 70 5f 43 | 6f 6d 6d 61 6e 64 57 69 |. Wimp_C|ommandWi|
|000002e0| 6e 64 6f 77 25 2c 30 0d | 01 4a 09 20 20 20 20 e1 |ndow%,0.|.J.    .|
|000002f0| 0d 01 54 04 0d 01 5e 10 | dd 20 f2 63 6c 6f 73 65 |..T...^.|. .close|
|00000300| 69 6e 66 6f 0d 01 68 28 | 20 20 20 20 c8 99 20 4f |info..h(|    .. O|
|00000310| 53 5f 52 65 61 64 4d 6f | 6e 6f 74 6f 6e 69 63 54 |S_ReadMo|notonicT|
|00000320| 69 6d 65 25 20 b8 20 74 | 69 6d 65 25 0d 01 72 30 |ime% . t|ime%..r0|
|00000330| 20 20 20 20 e7 20 74 69 | 6d 65 25 3e 43 6c 6f 73 |    . ti|me%>Clos|
|00000340| 65 54 69 6d 65 25 20 8c | 20 f2 63 6c 6f 73 65 77 |eTime% .| .closew|
|00000350| 69 6e 64 6f 77 28 49 6e | 66 6f 25 29 0d 01 7c 09 |indow(In|fo%)..|.|
|00000360| 20 20 20 20 e1 0d 01 86 | 04 0d 01 90 0e dd 20 f2 |    ....|...... .|
|00000370| 62 75 74 74 6f 6e 73 0d | 01 9a 20 20 20 20 20 f4 |buttons.|..     .|
|00000380| 20 78 25 2c 79 25 2c 62 | 75 74 25 2c 77 69 6e 64 | x%,y%,b|ut%,wind|
|00000390| 25 2c 69 63 6f 6e 25 0d | 01 a4 1f 20 20 20 20 e7 |%,icon%.|...    .|
|000003a0| 20 62 6b 25 21 38 3d 32 | 20 8c 20 f2 6f 70 65 6e | bk%!8=2| . .open|
|000003b0| 69 6e 66 6f 3a e1 0d 01 | ae 13 20 20 20 20 c8 8e |info:...|..    ..|
|000003c0| 20 62 6b 25 21 31 32 20 | ca 0d 01 b8 19 20 20 20 | bk%!12 |.....   |
|000003d0| 20 20 20 20 c9 20 49 6e | 70 75 74 57 69 6e 64 6f |    . In|putWindo|
|000003e0| 77 25 0d 01 c2 18 20 20 | 20 20 20 20 20 20 20 c8 |w%....  |       .|
|000003f0| 8e 20 62 6b 25 21 31 36 | 20 ca 0d 01 cc 2b 20 20 |. bk%!16| ....+  |
|00000400| 20 20 20 20 20 20 20 20 | 20 20 c9 20 43 72 65 61 |        |  . Crea|
|00000410| 74 65 52 6f 41 49 63 6f | 6e 25 20 3a 20 f2 6c 69 |teRoAIco|n% : .li|
|00000420| 73 74 28 b9 29 0d 01 d6 | 2b 20 20 20 20 20 20 20 |st(.)...|+       |
|00000430| 20 20 20 20 20 c9 20 53 | 74 61 66 66 4c 69 73 74 |     . S|taffList|
|00000440| 49 63 6f 6e 25 20 3a 20 | f2 6c 69 73 74 28 a3 29 |Icon% : |.list(.)|
|00000450| 0d 01 e0 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 |...*    |        |
|00000460| c9 20 51 75 69 74 49 63 | 6f 6e 25 20 20 20 20 20 |. QuitIc|on%     |
|00000470| 20 3a 20 71 75 69 74 25 | 3d b9 0d 01 ea 48 20 20 | : quit%|=....H  |
|00000480| 20 20 20 20 20 20 20 20 | 20 20 c9 20 49 6e 66 6f |        |  . Info|
|00000490| 49 63 6f 6e 25 20 20 20 | 20 20 20 3a 20 c8 99 20 |Icon%   |   : .. |
|000004a0| 22 57 69 6d 70 5f 53 74 | 61 72 74 54 61 73 6b 22 |"Wimp_St|artTask"|
|000004b0| 2c 22 3c 52 6f 41 24 44 | 69 72 3e 2e 21 48 65 6c |,"<RoA$D|ir>.!Hel|
|000004c0| 70 22 0d 01 f4 0e 20 20 | 20 20 20 20 20 20 20 cb |p"....  |       .|
|000004d0| 0d 01 fe 1a 20 20 20 20 | 20 20 20 c9 20 4f 75 74 |....    |   . Out|
|000004e0| 70 75 74 57 69 6e 64 6f | 77 25 0d 02 08 18 20 20 |putWindo|w%....  |
|000004f0| 20 20 20 20 20 20 20 c8 | 8e 20 62 6b 25 21 31 36 |       .|. bk%!16|
|00000500| 20 ca 0d 02 12 33 20 20 | 20 20 20 20 20 20 20 20 | ....3  |        |
|00000510| 20 20 c9 20 50 61 75 73 | 65 49 63 6f 6e 25 20 20 |  . Paus|eIcon%  |
|00000520| 20 20 20 20 20 20 3a 20 | 43 6f 6e 74 69 6e 75 6f |      : |Continuo|
|00000530| 75 73 25 3d a3 0d 02 1c | 31 20 20 20 20 20 20 20 |us%=....|1       |
|00000540| 20 20 20 20 20 c9 20 53 | 74 6f 70 49 63 6f 6e 25 |     . S|topIcon%|
|00000550| 20 20 20 20 20 20 20 20 | 20 3a 20 45 6e 64 50 72 |        | : EndPr|
|00000560| 69 6e 74 25 3d b9 0d 02 | 26 33 20 20 20 20 20 20 |int%=...|&3      |
|00000570| 20 20 20 20 20 20 c9 20 | 43 6f 6e 74 69 6e 75 6f |      . |Continuo|
|00000580| 75 73 49 63 6f 6e 25 20 | 20 20 3a 20 43 6f 6e 74 |usIcon% |  : Cont|
|00000590| 69 6e 75 6f 75 73 25 3d | b9 0d 02 30 2d 20 20 20 |inuous%=|...0-   |
|000005a0| 20 20 20 20 20 20 20 20 | 20 c9 20 53 6b 69 70 53 |        | . SkipS|
|000005b0| 74 75 64 65 6e 74 49 63 | 6f 6e 25 20 20 3a 20 53 |tudentIc|on%  : S|
|000005c0| 6b 69 70 25 3d b9 0d 02 | 3a 30 20 20 20 20 20 20 |kip%=...|:0      |
|000005d0| 20 20 20 20 20 20 c9 20 | 50 72 69 6e 74 53 74 75 |      . |PrintStu|
|000005e0| 64 65 6e 74 49 63 6f 6e | 25 20 3a 20 53 65 6e 64 |dentIcon|% : Send|
|000005f0| 4f 75 74 25 3d b9 0d 02 | 44 0e 20 20 20 20 20 20 |Out%=...|D.      |
|00000600| 20 20 20 cb 0d 02 4e 0c | 20 20 20 20 20 20 20 cb |   ...N.|       .|
|00000610| 0d 02 58 09 20 20 20 20 | e1 0d 02 62 04 0d 02 6c |..X.    |...b...l|
|00000620| 11 dd 20 f2 6c 69 73 74 | 28 52 6f 41 25 29 0d 02 |.. .list|(RoA%)..|
|00000630| 76 48 20 20 20 20 e7 20 | 24 50 74 72 53 74 61 74 |vH    . |$PtrStat|
|00000640| 65 6d 65 6e 74 73 49 63 | 6f 6e 25 3d 22 22 20 8c |ementsIc|on%="" .|
|00000650| 20 85 20 31 2c 22 53 74 | 61 74 65 6d 65 6e 74 20 | . 1,"St|atement |
|00000660| 44 61 74 61 66 69 6c 65 | 20 6e 6f 74 20 73 65 6c |Datafile| not sel|
|00000670| 65 63 74 65 64 22 0d 02 | 80 41 20 20 20 20 e7 20 |ected"..|.A    . |
|00000680| 24 50 74 72 53 74 75 64 | 65 6e 74 49 63 6f 6e 25 |$PtrStud|entIcon%|
|00000690| 3d 22 22 20 8c 20 85 20 | 31 2c 22 50 75 70 69 6c |="" . . |1,"Pupil|
|000006a0| 20 44 61 74 61 66 69 6c | 65 20 6e 6f 74 20 73 65 | Datafil|e not se|
|000006b0| 6c 65 63 74 65 64 22 0d | 02 8a 22 20 20 20 20 24 |lected".|.."    $|
|000006c0| 50 74 72 43 75 72 72 65 | 6e 74 53 74 75 64 65 6e |PtrCurre|ntStuden|
|000006d0| 74 49 63 6f 6e 25 3d 22 | 22 0d 02 94 22 20 20 20 |tIcon%="|"..."   |
|000006e0| 20 f2 63 6c 6f 73 65 77 | 69 6e 64 6f 77 28 49 6e | .closew|indow(In|
|000006f0| 70 75 74 57 69 6e 64 6f | 77 25 29 0d 02 9e 26 20 |putWindo|w%)...& |
|00000700| 20 20 20 f2 5f 4f 70 65 | 6e 4e 65 77 57 69 6e 64 |   ._Ope|nNewWind|
|00000710| 6f 77 28 4f 75 74 70 75 | 74 57 69 6e 64 6f 77 25 |ow(Outpu|tWindow%|
|00000720| 29 0d 02 a8 17 20 20 20 | 20 f2 6d 61 69 6e 70 72 |)....   | .mainpr|
|00000730| 6f 67 28 52 6f 41 25 29 | 0d 02 b2 23 20 20 20 20 |og(RoA%)|...#    |
|00000740| f2 63 6c 6f 73 65 77 69 | 6e 64 6f 77 28 4f 75 74 |.closewi|ndow(Out|
|00000750| 70 75 74 57 69 6e 64 6f | 77 25 29 0d 02 bc 25 20 |putWindo|w%)...% |
|00000760| 20 20 20 f2 5f 4f 70 65 | 6e 4e 65 77 57 69 6e 64 |   ._Ope|nNewWind|
|00000770| 6f 77 28 49 6e 70 75 74 | 57 69 6e 64 6f 77 25 29 |ow(Input|Window%)|
|00000780| 0d 02 c6 09 20 20 20 20 | e1 0d 02 d0 04 0d 02 da |....    |........|
|00000790| 0e dd 20 f2 72 65 63 65 | 69 76 65 0d 02 e4 2d 20 |.. .rece|ive...- |
|000007a0| 20 20 e3 20 69 25 3d 30 | 20 b8 20 21 62 6b 25 2d |  . i%=0| . !bk%-|
|000007b0| 31 20 88 20 34 3a 6f 6c | 64 62 6b 25 21 69 25 3d |1 . 4:ol|dbk%!i%=|
|000007c0| 62 6b 25 21 69 25 3a ed | 0d 02 ee 12 20 20 20 c8 |bk%!i%:.|....   .|
|000007d0| 8e 20 62 6b 25 21 31 36 | 20 ca 0d 02 f8 1c 20 20 |. bk%!16| .....  |
|000007e0| 20 20 20 20 c9 20 30 20 | 20 20 20 20 20 3a 20 71 |    . 0 |     : q|
|000007f0| 75 69 74 25 3d b9 0d 03 | 02 1f 20 20 20 20 20 20 |uit%=...|..      |
|00000800| c9 20 31 20 20 20 20 20 | 20 3a 20 f2 73 63 72 61 |. 1     | : .scra|
|00000810| 70 46 69 6c 65 0d 03 0c | 1c 20 20 20 20 20 20 c9 |pFile...|.      .|
|00000820| 20 32 20 20 20 20 20 20 | 3a 20 85 20 31 2c 22 32 | 2      |: . 1,"2|
|00000830| 22 0d 03 16 1c 20 20 20 | 20 20 20 c9 20 34 20 20 |"....   |   . 4  |
|00000840| 20 20 20 20 3a 20 85 20 | 31 2c 22 34 22 0d 03 20 |    : . |1,"4".. |
|00000850| 33 20 20 20 20 20 20 c9 | 20 33 20 20 20 20 20 20 |3      .| 3      |
|00000860| 3a 20 f2 64 61 74 61 66 | 69 6c 65 28 a4 67 65 74 |: .dataf|ile(.get|
|00000870| 73 74 72 69 6e 67 28 62 | 6b 25 2b 34 34 29 29 3a |string(b|k%+44)):|
|00000880| 0d 03 2a 0b 20 20 20 20 | 20 20 cb 0d 03 34 08 20 |..*.    |  ...4. |
|00000890| 20 20 e1 0d 03 3e 04 0d | 03 48 10 dd 20 f2 73 63 |  ...>..|.H.. .sc|
|000008a0| 72 61 70 46 69 6c 65 0d | 03 52 29 20 20 20 20 62 |rapFile.|.R)    b|
|000008b0| 6b 25 21 30 3d 28 34 38 | 2b a9 28 57 69 6d 70 53 |k%!0=(48|+.(WimpS|
|000008c0| 63 72 61 70 24 2b 22 20 | 22 29 29 80 20 ac 20 33 |crap$+" |")). . 3|
|000008d0| 0d 03 5c 14 20 20 20 20 | 62 6b 25 21 31 32 3d 62 |..\.    |bk%!12=b|
|000008e0| 6b 25 21 38 0d 03 66 10 | 20 20 20 20 62 6b 25 21 |k%!8..f.|    bk%!|
|000008f0| 31 36 3d 32 0d 03 70 44 | 20 20 20 20 62 6b 25 21 |16=2..pD|    bk%!|
|00000900| 33 36 3d 2d 31 3a f4 20 | 6d 61 6b 65 73 20 73 75 |36=-1:. |makes su|
|00000910| 72 65 20 64 6f 65 73 20 | 6e 6f 74 20 75 73 65 20 |re does |not use |
|00000920| 66 69 6c 65 6e 61 6d 65 | 20 6f 66 20 3c 57 69 6d |filename| of <Wim|
|00000930| 70 24 53 63 72 61 70 3e | 0d 03 7a 1c 20 20 20 20 |p$Scrap>|..z.    |
|00000940| 24 28 62 6b 25 2b 34 34 | 29 3d 57 69 6d 70 53 63 |$(bk%+44|)=WimpSc|
|00000950| 72 61 70 24 0d 03 84 2a | 20 20 20 20 c8 99 20 22 |rap$...*|    .. "|
|00000960| 57 69 6d 70 5f 53 65 6e | 64 4d 65 73 73 61 67 65 |Wimp_Sen|dMessage|
|00000970| 22 2c 31 37 2c 62 6b 25 | 2c 62 6b 25 21 34 0d 03 |",17,bk%|,bk%!4..|
|00000980| 8e 09 20 20 20 20 e1 0d | 03 98 04 0d 03 a2 1a dd |..    ..|........|
|00000990| 20 f2 64 61 74 61 66 69 | 6c 65 28 70 61 74 68 6e | .datafi|le(pathn|
|000009a0| 61 6d 65 24 29 0d 03 ac | 22 20 20 20 20 e7 20 62 |ame$)...|"    . b|
|000009b0| 6b 25 21 32 30 3c 3e 49 | 6e 70 75 74 57 69 6e 64 |k%!20<>I|nputWind|
|000009c0| 6f 77 25 20 8c 20 e1 0d | 03 b6 13 20 20 20 20 c8 |ow% . ..|...    .|
|000009d0| 8e 20 62 6b 25 21 34 30 | 20 ca 0d 03 c0 2c 20 20 |. bk%!40| ....,  |
|000009e0| 20 20 20 20 20 c9 20 52 | 6f 41 74 79 70 65 25 20 |     . R|oAtype% |
|000009f0| 3a 20 e7 20 53 63 72 61 | 70 54 65 78 74 45 78 69 |: . Scra|pTextExi|
|00000a00| 73 74 73 25 20 8c 0d 03 | ca 37 20 20 20 20 20 20 |sts% ...|.7      |
|00000a10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a20| 20 20 ff 28 22 44 65 6c | 65 74 65 20 22 2b 57 69 |  .("Del|ete "+Wi|
|00000a30| 6d 70 53 63 72 61 70 54 | 65 78 74 24 29 0d 03 d4 |mpScrapT|ext$)...|
|00000a40| 2e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|00000a50| 20 20 20 20 20 20 20 20 | 20 53 63 72 61 70 54 65 |        | ScrapTe|
|00000a60| 78 74 45 78 69 73 74 73 | 25 3d a3 0d 03 de 1d 20 |xtExists|%=..... |
|00000a70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a80| 20 20 20 20 20 20 20 cd | 0d 03 e8 2f 20 20 20 20 |       .|.../    |
|00000a90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 e7 |        |       .|
|00000aa0| 20 70 61 74 68 6e 61 6d | 65 24 3d 57 69 6d 70 53 | pathnam|e$=WimpS|
|00000ab0| 63 72 61 70 24 20 8c 0d | 03 f2 34 20 20 20 20 20 |crap$ ..|..4     |
|00000ac0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000ad0| 20 20 20 70 61 74 68 6e | 61 6d 65 24 3d 57 69 6d |   pathn|ame$=Wim|
|00000ae0| 70 53 63 72 61 70 54 65 | 78 74 24 0d 03 fc 46 20 |pScrapTe|xt$...F |
|00000af0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000b00| 20 20 20 20 20 20 20 ff | 28 22 52 65 6e 61 6d 65 |       .|("Rename|
|00000b10| 20 22 2b 57 69 6d 70 53 | 63 72 61 70 24 2b 22 20 | "+WimpS|crap$+" |
|00000b20| 22 2b 57 69 6d 70 53 63 | 72 61 70 54 65 78 74 24 |"+WimpSc|rapText$|
|00000b30| 29 0d 04 06 2e 20 20 20 | 20 20 20 20 20 20 20 20 |)....   |        |
|00000b40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 53 63 72 |        |     Scr|
|00000b50| 61 70 54 65 78 74 45 78 | 69 73 74 73 25 3d b9 0d |apTextEx|ists%=..|
|00000b60| 04 10 1d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |...     |        |
|00000b70| 20 20 20 20 20 20 20 20 | 20 20 20 cd 0d 04 1a 71 |        |   ....q|
|00000b80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000b90| 20 20 20 20 f2 63 68 61 | 6e 67 65 69 63 6f 6e 28 |    .cha|ngeicon(|
|00000ba0| 49 6e 70 75 74 57 69 6e | 64 6f 77 25 2c 53 74 61 |InputWin|dow%,Sta|
|00000bb0| 74 65 6d 65 6e 74 73 49 | 63 6f 6e 25 2c 50 74 72 |tementsI|con%,Ptr|
|00000bc0| 53 74 61 74 65 6d 65 6e | 74 73 49 63 6f 6e 25 2c |Statemen|tsIcon%,|
|00000bd0| 4c 65 6e 53 74 61 74 65 | 6d 65 6e 74 73 49 63 6f |LenState|mentsIco|
|00000be0| 6e 25 2c 70 61 74 68 6e | 61 6d 65 24 29 0d 04 24 |n%,pathn|ame$)..$|
|00000bf0| 27 20 20 20 20 20 20 20 | c9 20 26 44 46 45 20 3a |'       |. &DFE :|
|00000c00| 20 e7 20 53 63 72 61 70 | 43 53 56 65 78 69 73 74 | . Scrap|CSVexist|
|00000c10| 73 25 20 8c 0d 04 2e 36 | 20 20 20 20 20 20 20 20 |s% ....6|        |
|00000c20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000c30| ff 28 22 44 65 6c 65 74 | 65 20 22 2b 57 69 6d 70 |.("Delet|e "+Wimp|
|00000c40| 53 63 72 61 70 43 53 56 | 24 29 0d 04 38 2d 20 20 |ScrapCSV|$)..8-  |
|00000c50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000c60| 20 20 20 20 20 20 53 63 | 72 61 70 43 53 56 65 78 |      Sc|rapCSVex|
|00000c70| 69 73 74 73 25 3d a3 0d | 04 42 1d 20 20 20 20 20 |ists%=..|.B.     |
|00000c80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000c90| 20 20 20 cd 0d 04 4c 2f | 20 20 20 20 20 20 20 20 |   ...L/|        |
|00000ca0| 20 20 20 20 20 20 20 20 | 20 20 20 e7 20 70 61 74 |        |   . pat|
|00000cb0| 68 6e 61 6d 65 24 3d 57 | 69 6d 70 53 63 72 61 70 |hname$=W|impScrap|
|00000cc0| 24 20 8c 0d 04 56 33 20 | 20 20 20 20 20 20 20 20 |$ ...V3 |        |
|00000cd0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 70 |        |       p|
|00000ce0| 61 74 68 6e 61 6d 65 24 | 3d 57 69 6d 70 53 63 72 |athname$|=WimpScr|
|00000cf0| 61 70 43 53 56 24 0d 04 | 60 45 20 20 20 20 20 20 |apCSV$..|`E      |
|00000d00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000d10| 20 20 ff 28 22 52 65 6e | 61 6d 65 20 22 2b 57 69 |  .("Ren|ame "+Wi|
|00000d20| 6d 70 53 63 72 61 70 24 | 2b 22 20 22 2b 57 69 6d |mpScrap$|+" "+Wim|
|00000d30| 70 53 63 72 61 70 43 53 | 56 24 29 0d 04 6a 2d 20 |pScrapCS|V$)..j- |
|00000d40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000d50| 20 20 20 20 20 20 20 53 | 63 72 61 70 43 53 56 65 |       S|crapCSVe|
|00000d60| 78 69 73 74 73 25 3d b9 | 0d 04 74 1d 20 20 20 20 |xists%=.|..t.    |
|00000d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000d80| 20 20 20 20 cd 0d 04 7e | 67 20 20 20 20 20 20 20 |    ...~|g       |
|00000d90| 20 20 20 20 20 20 20 20 | 20 20 20 20 f2 63 68 61 |        |    .cha|
|00000da0| 6e 67 65 69 63 6f 6e 28 | 49 6e 70 75 74 57 69 6e |ngeicon(|InputWin|
|00000db0| 64 6f 77 25 2c 53 74 75 | 64 65 6e 74 49 63 6f 6e |dow%,Stu|dentIcon|
|00000dc0| 25 2c 50 74 72 53 74 75 | 64 65 6e 74 49 63 6f 6e |%,PtrStu|dentIcon|
|00000dd0| 25 2c 4c 65 6e 53 74 75 | 64 65 6e 74 49 63 6f 6e |%,LenStu|dentIcon|
|00000de0| 25 2c 70 61 74 68 6e 61 | 6d 65 24 29 0d 04 88 40 |%,pathna|me$)...@|
|00000df0| 20 20 20 20 20 20 20 7f | 20 3a 20 e7 20 70 61 74 |       .| : . pat|
|00000e00| 68 6e 61 6d 65 24 3d 57 | 69 6d 70 53 63 72 61 70 |hname$=W|impScrap|
|00000e10| 24 20 8c 20 ff 28 22 44 | 65 6c 65 74 65 20 3c 57 |$ . .("D|elete <W|
|00000e20| 69 6d 70 24 53 63 72 61 | 70 3e 22 29 0d 04 92 1b |imp$Scra|p>")....|
|00000e30| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000e40| 20 20 20 f2 61 63 6b 0d | 04 9c 42 20 20 20 20 20 |   .ack.|..B     |
|00000e50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 85 20 |        |      . |
|00000e60| 31 2c 22 49 6e 76 61 6c | 69 64 20 66 69 6c 65 20 |1,"Inval|id file |
|00000e70| 74 79 70 65 2c 20 6d 75 | 73 74 20 62 65 20 52 6f |type, mu|st be Ro|
|00000e80| 41 20 6f 72 20 43 53 56 | 22 0d 04 a6 18 20 20 20 |A or CSV|"....   |
|00000e90| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000ea0| cd 0d 04 b0 0c 20 20 20 | 20 20 20 20 cb 0d 04 ba |.....   |    ....|
|00000eb0| 0c 20 20 20 20 f2 61 63 | 6b 0d 04 c4 09 20 20 20 |.    .ac|k....   |
|00000ec0| 20 e1 0d 04 ce 04 0d 04 | d8 0a dd 20 f2 61 63 6b | .......|... .ack|
|00000ed0| 0d 04 e2 4f 20 20 20 20 | 6f 6c 64 62 6b 25 21 31 |...O    |oldbk%!1|
|00000ee0| 32 3d 6f 6c 64 62 6b 25 | 21 38 3a 6f 6c 64 62 6b |2=oldbk%|!8:oldbk|
|00000ef0| 25 21 31 36 3d 34 3a c8 | 99 20 22 57 69 6d 70 5f |%!16=4:.|. "Wimp_|
|00000f00| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 2c 31 37 2c |SendMess|age",17,|
|00000f10| 6f 6c 64 62 6b 25 2c 6f | 6c 64 62 6b 25 21 34 0d |oldbk%,o|ldbk%!4.|
|00000f20| 04 ec 09 20 20 20 20 e1 | 0d 04 f6 04 0d 05 00 30 |...    .|.......0|
|00000f30| dd 20 f2 63 68 61 6e 67 | 65 69 63 6f 6e 28 77 69 |. .chang|eicon(wi|
|00000f40| 6e 64 6f 77 25 2c 69 63 | 6f 6e 25 2c 70 74 72 25 |ndow%,ic|on%,ptr%|
|00000f50| 2c 6c 65 6e 25 2c 64 61 | 74 61 24 29 0d 05 0a 32 |,len%,da|ta$)...2|
|00000f60| 20 20 20 20 e7 20 a9 28 | 64 61 74 61 24 29 3e 6c |    . .(|data$)>l|
|00000f70| 65 6e 25 20 8c 20 85 20 | 31 2c 64 61 74 61 24 2b |en% . . |1,data$+|
|00000f80| 22 20 69 73 20 74 6f 6f | 20 6c 6f 6e 67 22 0d 05 |" is too| long"..|
|00000f90| 14 13 20 20 20 20 24 70 | 74 72 25 3d 64 61 74 61 |..    $p|tr%=data|
|00000fa0| 24 0d 05 1e 32 20 20 20 | 20 62 6b 25 21 30 3d 77 |$...2   | bk%!0=w|
|00000fb0| 69 6e 64 6f 77 25 3a 62 | 6b 25 21 34 3d 69 63 6f |indow%:b|k%!4=ico|
|00000fc0| 6e 25 3a 62 6b 25 21 38 | 3d 30 3a 62 6b 25 21 31 |n%:bk%!8|=0:bk%!1|
|00000fd0| 32 3d 30 0d 05 28 22 20 | 20 20 20 c8 99 20 57 69 |2=0..(" |   .. Wi|
|00000fe0| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 25 |mp_SetIc|onState%|
|00000ff0| 2c 2c 62 6b 25 0d 05 32 | 09 20 20 20 20 e1 0d 05 |,,bk%..2|.    ...|
|00001000| 3c 04 0d 05 46 14 dd 20 | a4 67 65 74 73 74 72 69 |<...F.. |.getstri|
|00001010| 6e 67 28 49 25 29 0d 05 | 50 10 20 20 20 ea 20 73 |ng(I%)..|P.   . s|
|00001020| 74 72 69 6e 67 24 0d 05 | 5a 11 20 20 20 73 74 72 |tring$..|Z.   str|
|00001030| 69 6e 67 24 3d 22 22 0d | 05 64 10 20 20 20 c8 95 |ing$="".|.d.   ..|
|00001040| 20 3f 49 25 3e 33 31 0d | 05 6e 19 20 20 20 20 20 | ?I%>31.|.n.     |
|00001050| 20 73 74 72 69 6e 67 24 | 2b 3d bd 28 3f 49 25 29 | string$|+=.(?I%)|
|00001060| 0d 05 78 0f 20 20 20 20 | 20 20 49 25 2b 3d 31 0d |..x.    |  I%+=1.|
|00001070| 05 82 0b 20 20 20 20 20 | 20 ce 0d 05 8c 0f 20 20 |...     | .....  |
|00001080| 20 3d 73 74 72 69 6e 67 | 24 0d 05 96 04 0d 05 a0 | =string|$.......|
|00001090| 10 dd 20 f2 63 6c 6f 73 | 65 64 6f 77 6e 0d 05 aa |.. .clos|edown...|
|000010a0| 0f 20 20 20 50 6f 6c 6c | 32 25 3d a3 0d 05 b4 13 |.   Poll|2%=.....|
|000010b0| 20 20 20 f2 65 6e 64 6d | 61 69 6e 70 72 6f 67 0d |   .endm|ainprog.|
|000010c0| 05 be 19 20 20 20 c8 99 | 20 57 69 6d 70 5f 43 6c |...   ..| Wimp_Cl|
|000010d0| 6f 73 65 44 6f 77 6e 25 | 0d 05 c8 36 20 20 20 e7 |oseDown%|...6   .|
|000010e0| 20 53 63 72 61 70 43 53 | 56 65 78 69 73 74 73 25 | ScrapCS|Vexists%|
|000010f0| 20 8c 20 ff 28 22 44 65 | 6c 65 74 65 20 3c 57 69 | . .("De|lete <Wi|
|00001100| 6d 70 24 53 63 72 61 70 | 43 53 56 3e 22 29 0d 05 |mp$Scrap|CSV>")..|
|00001110| d2 38 20 20 20 e7 20 53 | 63 72 61 70 54 65 78 74 |.8   . S|crapText|
|00001120| 45 78 69 73 74 73 25 20 | 8c 20 ff 28 22 44 65 6c |Exists% |. .("Del|
|00001130| 65 74 65 20 3c 57 69 6d | 70 24 53 63 72 61 70 54 |ete <Wim|p$ScrapT|
|00001140| 65 78 74 3e 22 29 0d 05 | dc 1f 20 20 20 ff 28 22 |ext>")..|..   .("|
|00001150| 55 6e 73 65 74 20 57 69 | 6d 70 24 53 63 72 61 70 |Unset Wi|mp$Scrap|
|00001160| 43 53 56 22 29 0d 05 e6 | 20 20 20 20 ff 28 22 55 |CSV")...|    .("U|
|00001170| 6e 73 65 74 20 57 69 6d | 70 24 53 63 72 61 70 54 |nset Wim|p$ScrapT|
|00001180| 65 78 74 22 29 0d 05 f0 | 08 20 20 20 e1 0d 05 fa |ext")...|.   ....|
|00001190| 04 0d 06 04 18 dd 20 f2 | 69 6e 69 74 69 61 6c 69 |...... .|initiali|
|000011a0| 73 65 50 72 65 57 69 6d | 70 0d 06 0e 0c 20 20 20 |sePreWim|p....   |
|000011b0| 20 ea 20 49 25 0d 06 18 | 1c 20 20 20 20 6d 79 74 | . I%...|.    myt|
|000011c0| 61 73 6b 24 3d 22 43 72 | 65 61 74 65 20 52 6f 41 |ask$="Cr|eate RoA|
|000011d0| 22 0d 06 22 23 20 20 20 | 20 4f 53 5f 53 57 49 4e |".."#   | OS_SWIN|
|000011e0| 75 6d 62 65 72 46 72 6f | 6d 53 74 72 69 6e 67 25 |umberFro|mString%|
|000011f0| 3d 26 33 39 0d 06 2c 2d | 20 20 20 20 57 69 6d 70 |=&39..,-|    Wimp|
|00001200| 5f 50 6f 6c 6c 25 3d a4 | 5f 53 57 49 74 6f 4e 75 |_Poll%=.|_SWItoNu|
|00001210| 6d 62 65 72 28 22 57 69 | 6d 70 5f 50 6f 6c 6c 22 |mber("Wi|mp_Poll"|
|00001220| 29 0d 06 36 41 20 20 20 | 20 57 69 6d 70 5f 47 65 |)..6A   | Wimp_Ge|
|00001230| 74 50 6f 69 6e 74 65 72 | 49 6e 66 6f 25 3d a4 5f |tPointer|Info%=._|
|00001240| 53 57 49 74 6f 4e 75 6d | 62 65 72 28 22 57 69 6d |SWItoNum|ber("Wim|
|00001250| 70 5f 47 65 74 50 6f 69 | 6e 74 65 72 49 6e 66 6f |p_GetPoi|nterInfo|
|00001260| 22 29 0d 06 40 3b 20 20 | 20 20 57 69 6d 70 5f 53 |")..@;  |  Wimp_S|
|00001270| 65 6e 64 4d 65 73 73 61 | 67 65 25 3d a4 5f 53 57 |endMessa|ge%=._SW|
|00001280| 49 74 6f 4e 75 6d 62 65 | 72 28 22 57 69 6d 70 5f |ItoNumbe|r("Wimp_|
|00001290| 53 65 6e 64 4d 65 73 73 | 61 67 65 22 29 0d 06 4a |SendMess|age")..J|
|000012a0| 3d 20 20 20 20 57 69 6d | 70 5f 47 65 74 49 63 6f |=    Wim|p_GetIco|
|000012b0| 6e 53 74 61 74 65 25 3d | a4 5f 53 57 49 74 6f 4e |nState%=|._SWItoN|
|000012c0| 75 6d 62 65 72 28 22 57 | 69 6d 70 5f 47 65 74 49 |umber("W|imp_GetI|
|000012d0| 63 6f 6e 53 74 61 74 65 | 22 29 0d 06 54 3f 20 20 |conState|")..T?  |
|000012e0| 20 20 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |  Wimp_G|etWindow|
|000012f0| 49 6e 66 6f 25 3d a4 5f | 53 57 49 74 6f 4e 75 6d |Info%=._|SWItoNum|
|00001300| 62 65 72 28 22 57 69 6d | 70 5f 47 65 74 57 69 6e |ber("Wim|p_GetWin|
|00001310| 64 6f 77 49 6e 66 6f 22 | 29 0d 06 5e 41 20 20 20 |dowInfo"|)..^A   |
|00001320| 20 57 69 6d 70 5f 47 65 | 74 57 69 6e 64 6f 77 53 | Wimp_Ge|tWindowS|
|00001330| 74 61 74 65 25 3d a4 5f | 53 57 49 74 6f 4e 75 6d |tate%=._|SWItoNum|
|00001340| 62 65 72 28 22 57 69 6d | 70 5f 47 65 74 57 69 6e |ber("Wim|p_GetWin|
|00001350| 64 6f 77 53 74 61 74 65 | 22 29 0d 06 68 3f 20 20 |dowState|")..h?  |
|00001360| 20 20 57 69 6d 70 5f 54 | 72 61 6e 73 66 65 72 42 |  Wimp_T|ransferB|
|00001370| 6c 6f 63 6b 25 3d a4 5f | 53 57 49 74 6f 4e 75 6d |lock%=._|SWItoNum|
|00001380| 62 65 72 28 22 57 69 6d | 70 5f 54 72 61 6e 73 66 |ber("Wim|p_Transf|
|00001390| 65 72 42 6c 6f 63 6b 22 | 29 0d 06 72 39 20 20 20 |erBlock"|)..r9   |
|000013a0| 20 57 69 6d 70 5f 49 6e | 69 74 69 61 6c 69 73 65 | Wimp_In|itialise|
|000013b0| 25 3d a4 5f 53 57 49 74 | 6f 4e 75 6d 62 65 72 28 |%=._SWIt|oNumber(|
|000013c0| 22 57 69 6d 70 5f 49 6e | 69 74 69 61 6c 69 73 65 |"Wimp_In|itialise|
|000013d0| 22 29 0d 06 7c 3b 20 20 | 20 20 57 69 6d 70 5f 52 |")..|;  |  Wimp_R|
|000013e0| 65 70 6f 72 74 45 72 72 | 6f 72 25 3d a4 5f 53 57 |eportErr|or%=._SW|
|000013f0| 49 74 6f 4e 75 6d 62 65 | 72 28 22 57 69 6d 70 5f |ItoNumbe|r("Wimp_|
|00001400| 52 65 70 6f 72 74 45 72 | 72 6f 72 22 29 0d 06 86 |ReportEr|ror")...|
|00001410| 39 20 20 20 20 57 69 6d | 70 5f 43 72 65 61 74 65 |9    Wim|p_Create|
|00001420| 49 63 6f 6e 25 3d a4 5f | 53 57 49 74 6f 4e 75 6d |Icon%=._|SWItoNum|
|00001430| 62 65 72 28 22 57 69 6d | 70 5f 43 72 65 61 74 65 |ber("Wim|p_Create|
|00001440| 49 63 6f 6e 22 29 0d 06 | 90 3d 20 20 20 20 57 69 |Icon")..|.=    Wi|
|00001450| 6d 70 5f 53 65 74 49 63 | 6f 6e 53 74 61 74 65 25 |mp_SetIc|onState%|
|00001460| 3d a4 5f 53 57 49 74 6f | 4e 75 6d 62 65 72 28 22 |=._SWIto|Number("|
|00001470| 57 69 6d 70 5f 53 65 74 | 49 63 6f 6e 53 74 61 74 |Wimp_Set|IconStat|
|00001480| 65 22 29 0d 06 9a 37 20 | 20 20 20 57 69 6d 70 5f |e")...7 |   Wimp_|
|00001490| 43 6c 6f 73 65 44 6f 77 | 6e 25 3d a4 5f 53 57 49 |CloseDow|n%=._SWI|
|000014a0| 74 6f 4e 75 6d 62 65 72 | 28 22 57 69 6d 70 5f 43 |toNumber|("Wimp_C|
|000014b0| 6c 6f 73 65 44 6f 77 6e | 22 29 0d 06 a4 39 20 20 |loseDown|")...9  |
|000014c0| 20 20 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |  Wimp_C|reateMen|
|000014d0| 75 25 3d a4 5f 53 57 49 | 74 6f 4e 75 6d 62 65 72 |u%=._SWI|toNumber|
|000014e0| 28 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |("Wimp_C|reateMen|
|000014f0| 75 22 29 0d 06 ae 3d 20 | 20 20 20 57 69 6d 70 5f |u")...= |   Wimp_|
|00001500| 43 72 65 61 74 65 57 69 | 6e 64 6f 77 25 3d a4 5f |CreateWi|ndow%=._|
|00001510| 53 57 49 74 6f 4e 75 6d | 62 65 72 28 22 57 69 6d |SWItoNum|ber("Wim|
|00001520| 70 5f 43 72 65 61 74 65 | 57 69 6e 64 6f 77 22 29 |p_Create|Window")|
|00001530| 0d 06 b8 39 20 20 20 20 | 57 69 6d 70 5f 44 65 63 |...9    |Wimp_Dec|
|00001540| 6f 64 65 4d 65 6e 75 25 | 3d a4 5f 53 57 49 74 6f |odeMenu%|=._SWIto|
|00001550| 4e 75 6d 62 65 72 28 22 | 57 69 6d 70 5f 44 65 63 |Number("|Wimp_Dec|
|00001560| 6f 64 65 4d 65 6e 75 22 | 29 0d 06 c2 3d 20 20 20 |odeMenu"|)...=   |
|00001570| 20 57 69 6d 70 5f 4f 70 | 65 6e 54 65 6d 70 6c 61 | Wimp_Op|enTempla|
|00001580| 74 65 25 3d a4 5f 53 57 | 49 74 6f 4e 75 6d 62 65 |te%=._SW|ItoNumbe|
|00001590| 72 28 22 57 69 6d 70 5f | 4f 70 65 6e 54 65 6d 70 |r("Wimp_|OpenTemp|
|000015a0| 6c 61 74 65 22 29 0d 06 | cc 3f 20 20 20 20 57 69 |late")..|.?    Wi|
|000015b0| 6d 70 5f 43 6c 6f 73 65 | 54 65 6d 70 6c 61 74 65 |mp_Close|Template|
|000015c0| 25 3d a4 5f 53 57 49 74 | 6f 4e 75 6d 62 65 72 28 |%=._SWIt|oNumber(|
|000015d0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 54 65 6d 70 6c |"Wimp_Cl|oseTempl|
|000015e0| 61 74 65 22 29 0d 06 d6 | 3d 20 20 20 20 57 69 6d |ate")...|=    Wim|
|000015f0| 70 5f 4c 6f 61 64 54 65 | 6d 70 6c 61 74 65 25 3d |p_LoadTe|mplate%=|
|00001600| a4 5f 53 57 49 74 6f 4e | 75 6d 62 65 72 28 22 57 |._SWItoN|umber("W|
|00001610| 69 6d 70 5f 4c 6f 61 64 | 54 65 6d 70 6c 61 74 65 |imp_Load|Template|
|00001620| 22 29 0d 06 e0 3d 20 20 | 20 20 57 69 6d 70 5f 52 |")...=  |  Wimp_R|
|00001630| 65 64 72 61 77 57 69 6e | 64 6f 77 25 3d a4 5f 53 |edrawWin|dow%=._S|
|00001640| 57 49 74 6f 4e 75 6d 62 | 65 72 28 22 57 69 6d 70 |WItoNumb|er("Wimp|
|00001650| 5f 52 65 64 72 61 77 57 | 69 6e 64 6f 77 22 29 0d |_RedrawW|indow").|
|00001660| 06 ea 3d 20 20 20 20 57 | 69 6d 70 5f 47 65 74 52 |..=    W|imp_GetR|
|00001670| 65 63 74 61 6e 67 6c 65 | 25 3d a4 5f 53 57 49 74 |ectangle|%=._SWIt|
|00001680| 6f 4e 75 6d 62 65 72 28 | 22 57 69 6d 70 5f 47 65 |oNumber(|"Wimp_Ge|
|00001690| 74 52 65 63 74 61 6e 67 | 6c 65 22 29 0d 06 f4 41 |tRectang|le")...A|
|000016a0| 20 20 20 20 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |    Wimp|_GetWind|
|000016b0| 6f 77 53 74 61 74 65 25 | 3d a4 5f 53 57 49 74 6f |owState%|=._SWIto|
|000016c0| 4e 75 6d 62 65 72 28 22 | 57 69 6d 70 5f 47 65 74 |Number("|Wimp_Get|
|000016d0| 57 69 6e 64 6f 77 53 74 | 61 74 65 22 29 0d 06 fe |WindowSt|ate")...|
|000016e0| 39 20 20 20 20 57 69 6d | 70 5f 4f 70 65 6e 57 69 |9    Wim|p_OpenWi|
|000016f0| 6e 64 6f 77 25 3d a4 5f | 53 57 49 74 6f 4e 75 6d |ndow%=._|SWItoNum|
|00001700| 62 65 72 28 22 57 69 6d | 70 5f 4f 70 65 6e 57 69 |ber("Wim|p_OpenWi|
|00001710| 6e 64 6f 77 22 29 0d 07 | 08 3b 20 20 20 20 57 69 |ndow")..|.;    Wi|
|00001720| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 25 3d |mp_Close|Window%=|
|00001730| a4 5f 53 57 49 74 6f 4e | 75 6d 62 65 72 28 22 57 |._SWItoN|umber("W|
|00001740| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00001750| 29 0d 07 12 39 20 20 20 | 20 57 69 6d 70 5f 50 72 |)...9   | Wimp_Pr|
|00001760| 6f 63 65 73 73 4b 65 79 | 25 3d a4 5f 53 57 49 74 |ocessKey|%=._SWIt|
|00001770| 6f 4e 75 6d 62 65 72 28 | 22 57 69 6d 70 5f 50 72 |oNumber(|"Wimp_Pr|
|00001780| 6f 63 65 73 73 4b 65 79 | 22 29 0d 07 1c 3f 20 20 |ocessKey|")...?  |
|00001790| 20 20 57 69 6d 70 5f 43 | 6f 6d 6d 61 6e 64 57 69 |  Wimp_C|ommandWi|
|000017a0| 6e 64 6f 77 25 3d a4 5f | 53 57 49 74 6f 4e 75 6d |ndow%=._|SWItoNum|
|000017b0| 62 65 72 28 22 57 69 6d | 70 5f 43 6f 6d 6d 61 6e |ber("Wim|p_Comman|
|000017c0| 64 57 69 6e 64 6f 77 22 | 29 0d 07 26 45 20 20 20 |dWindow"|)..&E   |
|000017d0| 20 57 69 6d 70 5f 53 65 | 74 43 61 72 65 74 50 6f | Wimp_Se|tCaretPo|
|000017e0| 73 69 74 69 6f 6e 25 3d | a4 5f 53 57 49 74 6f 4e |sition%=|._SWItoN|
|000017f0| 75 6d 62 65 72 28 22 57 | 69 6d 70 5f 53 65 74 43 |umber("W|imp_SetC|
|00001800| 61 72 65 74 50 6f 73 69 | 74 69 6f 6e 22 29 0d 07 |aretPosi|tion")..|
|00001810| 30 45 20 20 20 20 57 69 | 6d 70 5f 47 65 74 43 61 |0E    Wi|mp_GetCa|
|00001820| 72 65 74 50 6f 73 69 74 | 69 6f 6e 25 3d a4 5f 53 |retPosit|ion%=._S|
|00001830| 57 49 74 6f 4e 75 6d 62 | 65 72 28 22 57 69 6d 70 |WItoNumb|er("Wimp|
|00001840| 5f 47 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_GetCare|tPositio|
|00001850| 6e 22 29 0d 07 3a 52 20 | 20 20 c8 99 20 22 4f 53 |n")..:R |  .. "OS|
|00001860| 5f 53 57 49 4e 75 6d 62 | 65 72 46 72 6f 6d 53 74 |_SWINumb|erFromSt|
|00001870| 72 69 6e 67 22 2c 2c 22 | 4f 53 5f 52 65 61 64 4d |ring",,"|OS_ReadM|
|00001880| 6f 6e 6f 74 6f 6e 69 63 | 54 69 6d 65 22 20 b8 20 |onotonic|Time" . |
|00001890| 4f 53 5f 52 65 61 64 4d | 6f 6e 6f 74 6f 6e 69 63 |OS_ReadM|onotonic|
|000018a0| 54 69 6d 65 25 0d 07 44 | 37 20 20 20 20 58 4f 53 |Time%..D|7    XOS|
|000018b0| 5f 52 65 61 64 56 61 72 | 56 61 6c 25 3d a4 5f 53 |_ReadVar|Val%=._S|
|000018c0| 57 49 74 6f 4e 75 6d 62 | 65 72 28 22 58 4f 53 5f |WItoNumb|er("XOS_|
|000018d0| 52 65 61 64 56 61 72 56 | 61 6c 22 29 0d 07 4e 41 |ReadVarV|al")..NA|
|000018e0| 20 20 20 20 4d 65 73 73 | 61 67 65 54 72 61 6e 73 |    Mess|ageTrans|
|000018f0| 5f 4c 6f 6f 6b 75 70 25 | 3d a4 5f 53 57 49 74 6f |_Lookup%|=._SWIto|
|00001900| 4e 75 6d 62 65 72 28 22 | 4d 65 73 73 61 67 65 54 |Number("|MessageT|
|00001910| 72 61 6e 73 5f 4c 6f 6f | 6b 75 70 22 29 0d 07 58 |rans_Loo|kup")..X|
|00001920| 43 20 20 20 20 58 4d 65 | 73 73 61 67 65 54 72 61 |C    XMe|ssageTra|
|00001930| 6e 73 5f 4c 6f 6f 6b 75 | 70 25 3d a4 5f 53 57 49 |ns_Looku|p%=._SWI|
|00001940| 74 6f 4e 75 6d 62 65 72 | 28 22 58 4d 65 73 73 61 |toNumber|("XMessa|
|00001950| 67 65 54 72 61 6e 73 5f | 4c 6f 6f 6b 75 70 22 29 |geTrans_|Lookup")|
|00001960| 0d 07 62 31 20 20 20 20 | 4f 53 5f 53 70 72 69 74 |..b1    |OS_Sprit|
|00001970| 65 4f 70 25 3d a4 5f 53 | 57 49 74 6f 4e 75 6d 62 |eOp%=._S|WItoNumb|
|00001980| 65 72 28 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 |er("OS_S|priteOp"|
|00001990| 29 0d 07 6c 14 20 20 20 | 20 4c 65 6e 44 61 74 61 |)..l.   | LenData|
|000019a0| 25 3d 34 30 30 0d 07 76 | 2f 20 20 20 20 de 20 62 |%=400..v|/    . b|
|000019b0| 6b 25 20 31 30 30 30 2c | 6f 6c 64 62 6b 25 20 31 |k% 1000,|oldbk% 1|
|000019c0| 30 30 30 2c 64 61 74 61 | 25 20 4c 65 6e 44 61 74 |000,data|% LenDat|
|000019d0| 61 25 2b 31 0d 07 80 31 | 20 20 20 20 52 6f 41 74 |a%+1...1|    RoAt|
|000019e0| 79 70 65 25 3d a0 28 a4 | 5f 52 65 61 64 5f 56 61 |ype%=.(.|_Read_Va|
|000019f0| 6c 28 43 6c 65 61 72 25 | 2c 22 52 6f 41 24 54 79 |l(Clear%|,"RoA$Ty|
|00001a00| 70 65 22 29 29 0d 07 8a | 13 20 20 20 20 f2 73 63 |pe"))...|.    .sc|
|00001a10| 72 61 70 46 69 6c 65 73 | 0d 07 94 09 20 20 20 20 |rapFiles|....    |
|00001a20| e1 0d 07 9e 04 0d 07 a8 | 11 dd 20 f2 73 63 72 61 |........|.. .scra|
|00001a30| 70 46 69 6c 65 73 0d 07 | b2 0c 20 20 20 20 ea 20 |pFiles..|..    . |
|00001a40| 46 25 0d 07 bc 2d 20 20 | 20 20 57 69 6d 70 53 63 |F%...-  |  WimpSc|
|00001a50| 72 61 70 24 3d a4 5f 52 | 65 61 64 5f 56 61 6c 28 |rap$=._R|ead_Val(|
|00001a60| a3 2c 22 57 69 6d 70 24 | 53 63 72 61 70 22 29 0d |.,"Wimp$|Scrap").|
|00001a70| 07 c6 3b 20 20 20 20 e7 | 20 57 69 6d 70 53 63 72 |..;    .| WimpScr|
|00001a80| 61 70 24 3d 22 22 20 8c | 20 85 20 30 2c 22 53 63 |ap$="" .| . 0,"Sc|
|00001a90| 72 61 70 20 61 72 65 61 | 20 6e 65 65 64 73 20 74 |rap area| needs t|
|00001aa0| 6f 20 62 65 20 73 65 65 | 6e 22 0d 07 d0 2b 20 20 |o be see|n"...+  |
|00001ab0| 20 20 57 69 6d 70 53 63 | 72 61 70 52 6f 6f 74 24 |  WimpSc|rapRoot$|
|00001ac0| 3d a4 64 69 72 52 6f 6f | 74 28 57 69 6d 70 53 63 |=.dirRoo|t(WimpSc|
|00001ad0| 72 61 70 24 29 0d 07 da | 25 20 20 20 20 57 69 6d |rap$)...|%    Wim|
|00001ae0| 70 53 63 72 61 70 43 53 | 56 24 3d 22 57 69 6d 70 |pScrapCS|V$="Wimp|
|00001af0| 24 53 63 72 61 70 43 53 | 56 22 0d 07 e4 3c 20 20 |$ScrapCS|V"...<  |
|00001b00| 20 20 ff 28 22 53 65 74 | 20 22 2b 57 69 6d 70 53 |  .("Set| "+WimpS|
|00001b10| 63 72 61 70 43 53 56 24 | 2b 22 20 22 2b 57 69 6d |crapCSV$|+" "+Wim|
|00001b20| 70 53 63 72 61 70 52 6f | 6f 74 24 2b 22 52 6f 41 |pScrapRo|ot$+"RoA|
|00001b30| 5f 43 53 56 22 29 0d 07 | ee 2b 20 20 20 20 57 69 |_CSV")..|.+    Wi|
|00001b40| 6d 70 53 63 72 61 70 43 | 53 56 24 3d 22 3c 22 2b |mpScrapC|SV$="<"+|
|00001b50| 57 69 6d 70 53 63 72 61 | 70 43 53 56 24 2b 22 3e |WimpScra|pCSV$+">|
|00001b60| 22 0d 07 f8 27 20 20 20 | 20 57 69 6d 70 53 63 72 |"...'   | WimpScr|
|00001b70| 61 70 54 65 78 74 24 3d | 22 57 69 6d 70 24 53 63 |apText$=|"Wimp$Sc|
|00001b80| 72 61 70 54 65 78 74 22 | 0d 08 02 3e 20 20 20 20 |rapText"|...>    |
|00001b90| ff 28 22 53 65 74 20 22 | 2b 57 69 6d 70 53 63 72 |.("Set "|+WimpScr|
|00001ba0| 61 70 54 65 78 74 24 2b | 22 20 22 2b 57 69 6d 70 |apText$+|" "+Wimp|
|00001bb0| 53 63 72 61 70 52 6f 6f | 74 24 2b 22 52 6f 41 5f |ScrapRoo|t$+"RoA_|
|00001bc0| 54 65 78 74 22 29 0d 08 | 0c 2d 20 20 20 20 57 69 |Text")..|.-    Wi|
|00001bd0| 6d 70 53 63 72 61 70 54 | 65 78 74 24 3d 22 3c 22 |mpScrapT|ext$="<"|
|00001be0| 2b 57 69 6d 70 53 63 72 | 61 70 54 65 78 74 24 2b |+WimpScr|apText$+|
|00001bf0| 22 3e 22 0d 08 16 21 20 | 20 20 20 57 69 6d 70 53 |">"...! |   WimpS|
|00001c00| 63 72 61 70 24 3d 22 3c | 57 69 6d 70 24 53 63 72 |crap$="<|Wimp$Scr|
|00001c10| 61 70 3e 22 0d 08 20 19 | 20 20 20 20 53 63 72 61 |ap>".. .|    Scra|
|00001c20| 70 43 53 56 65 78 69 73 | 74 73 25 3d a3 0d 08 2a |pCSVexis|ts%=...*|
|00001c30| 1a 20 20 20 20 53 63 72 | 61 70 54 65 78 74 45 78 |.    Scr|apTextEx|
|00001c40| 69 73 74 73 25 3d a3 0d | 08 34 1b 20 20 20 20 46 |ists%=..|.4.    F|
|00001c50| 25 3d 8e 28 57 69 6d 70 | 53 63 72 61 70 43 53 56 |%=.(Wimp|ScrapCSV|
|00001c60| 24 29 0d 08 3e 31 20 20 | 20 20 e7 20 46 25 3e 30 |$)..>1  |  . F%>0|
|00001c70| 20 8c 20 d9 20 23 46 25 | 3a ff 28 22 44 65 6c 65 | . . #F%|:.("Dele|
|00001c80| 74 65 20 22 2b 57 69 6d | 70 53 63 72 61 70 43 53 |te "+Wim|pScrapCS|
|00001c90| 56 24 29 0d 08 48 1c 20 | 20 20 20 46 25 3d 8e 28 |V$)..H. |   F%=.(|
|00001ca0| 57 69 6d 70 53 63 72 61 | 70 54 65 78 74 24 29 0d |WimpScra|pText$).|
|00001cb0| 08 52 37 20 20 20 20 e7 | 20 46 25 3e 30 20 8c 20 |.R7    .| F%>0 . |
|00001cc0| d9 20 23 46 25 3a ff 28 | 22 57 69 70 65 20 22 2b |. #F%:.(|"Wipe "+|
|00001cd0| 57 69 6d 70 53 63 72 61 | 70 54 65 78 74 24 2b 22 |WimpScra|pText$+"|
|00001ce0| 20 7e 43 46 22 29 0d 08 | 5c 09 20 20 20 20 e1 0d | ~CF")..|\.    ..|
|00001cf0| 08 66 04 0d 08 70 19 dd | 20 a4 64 69 72 52 6f 6f |.f...p..| .dirRoo|
|00001d00| 74 28 70 61 74 68 6e 61 | 6d 65 24 29 0d 08 7a 46 |t(pathna|me$)..zF|
|00001d10| 20 20 20 20 e7 20 a7 70 | 61 74 68 6e 61 6d 65 24 |    . .p|athname$|
|00001d20| 2c 22 2e 22 29 3d 30 20 | 8c 20 85 20 31 2c 22 3c |,".")=0 |. . 1,"<|
|00001d30| 57 69 6d 70 24 53 63 72 | 61 70 3e 20 69 6e 76 61 |Wimp$Scr|ap> inva|
|00001d40| 6c 69 64 2c 20 6e 6f 20 | 66 75 6c 6c 20 73 74 6f |lid, no |full sto|
|00001d50| 70 22 0d 08 84 09 20 20 | 20 20 f5 0d 08 8e 20 20 |p"....  |  ....  |
|00001d60| 20 20 20 20 20 20 70 61 | 74 68 6e 61 6d 65 24 3d |      pa|thname$=|
|00001d70| c0 70 61 74 68 6e 61 6d | 65 24 29 0d 08 98 1c 20 |.pathnam|e$).... |
|00001d80| 20 20 20 20 20 20 fd 20 | c2 70 61 74 68 6e 61 6d |      . |.pathnam|
|00001d90| 65 24 29 3d 22 2e 22 0d | 08 a2 12 20 20 20 20 3d |e$)=".".|...    =|
|00001da0| 70 61 74 68 6e 61 6d 65 | 24 0d 08 ac 04 0d 08 b6 |pathname|$.......|
|00001db0| 19 dd 20 a4 5f 53 57 49 | 74 6f 4e 75 6d 62 65 72 |.. ._SWI|toNumber|
|00001dc0| 28 53 57 49 24 29 0d 08 | c0 0e 20 20 20 20 ea 20 |(SWI$)..|..    . |
|00001dd0| 73 77 69 25 0d 08 ca 2f | 20 20 20 20 c8 99 20 4f |swi%.../|    .. O|
|00001de0| 53 5f 53 57 49 4e 75 6d | 62 65 72 46 72 6f 6d 53 |S_SWINum|berFromS|
|00001df0| 74 72 69 6e 67 25 2c 2c | 53 57 49 24 20 b8 20 73 |tring%,,|SWI$ . s|
|00001e00| 77 69 25 0d 08 d4 0d 20 | 20 20 20 3d 73 77 69 25 |wi%.... |   =swi%|
|00001e10| 0d 08 de 04 0d 08 e8 19 | dd 20 f2 69 6e 69 74 69 |........|. .initi|
|00001e20| 61 6c 69 73 65 50 6f 73 | 74 57 69 6d 70 0d 08 f2 |alisePos|tWimp...|
|00001e30| 3e 20 20 20 20 c8 99 20 | 57 69 6d 70 5f 49 6e 69 |>    .. |Wimp_Ini|
|00001e40| 74 69 61 6c 69 73 65 25 | 2c 32 30 30 2c 26 34 42 |tialise%|,200,&4B|
|00001e50| 35 33 34 31 35 34 2c 6d | 79 74 61 73 6b 24 20 b8 |534154,m|ytask$ .|
|00001e60| 20 2c 6d 79 68 61 6e 64 | 6c 65 25 0d 08 fc 13 20 | ,myhand|le%.... |
|00001e70| 20 20 20 f2 5f 54 65 6d | 70 6c 61 74 65 73 0d 09 |   ._Tem|plates..|
|00001e80| 06 09 20 20 20 20 e1 0d | 09 10 04 0d 09 1a 11 dd |..    ..|........|
|00001e90| 20 f2 5f 54 65 6d 70 6c | 61 74 65 73 0d 09 24 47 | ._Templ|ates..$G|
|00001ea0| 20 20 20 20 4c 65 6e 54 | 65 6d 42 75 66 25 3d 31 |    LenT|emBuf%=1|
|00001eb0| 30 30 30 3a de 20 54 65 | 6d 42 75 66 25 20 4c 65 |000:. Te|mBuf% Le|
|00001ec0| 6e 54 65 6d 42 75 66 25 | 3a 45 6e 64 42 75 66 25 |nTemBuf%|:EndBuf%|
|00001ed0| 3d 54 65 6d 42 75 66 25 | 2b 4c 65 6e 54 65 6d 42 |=TemBuf%|+LenTemB|
|00001ee0| 75 66 25 0d 09 2e 34 20 | 20 20 20 c8 99 20 57 69 |uf%...4 |   .. Wi|
|00001ef0| 6d 70 5f 4f 70 65 6e 54 | 65 6d 70 6c 61 74 65 25 |mp_OpenT|emplate%|
|00001f00| 2c 2c 22 3c 52 6f 61 24 | 44 69 72 3e 2e 54 65 6d |,,"<Roa$|Dir>.Tem|
|00001f10| 70 6c 61 74 65 73 22 0d | 09 38 4c 20 20 20 20 c8 |plates".|.8L    .|
|00001f20| 99 20 57 69 6d 70 5f 4c | 6f 61 64 54 65 6d 70 6c |. Wimp_L|oadTempl|
|00001f30| 61 74 65 25 2c 2c 62 6b | 25 2c 54 65 6d 42 75 66 |ate%,,bk|%,TemBuf|
|00001f40| 25 2c 45 6e 64 42 75 66 | 25 2c 2d 31 2c 22 49 6e |%,EndBuf|%,-1,"In|
|00001f50| 70 75 74 22 2c 30 20 b8 | 20 2c 2c 4e 65 78 74 42 |put",0 .| ,,NextB|
|00001f60| 75 66 25 0d 09 42 04 0d | 09 4c 31 20 20 20 20 c8 |uf%..B..|.L1    .|
|00001f70| 99 20 57 69 6d 70 5f 43 | 72 65 61 74 65 57 69 6e |. Wimp_C|reateWin|
|00001f80| 64 6f 77 25 2c 2c 62 6b | 25 20 b8 20 49 6e 70 75 |dow%,,bk|% . Inpu|
|00001f90| 74 57 69 6e 64 6f 77 25 | 0d 09 56 4e 20 20 20 20 |tWindow%|..VN    |
|00001fa0| c8 99 20 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |.. Wimp_|LoadTemp|
|00001fb0| 6c 61 74 65 25 2c 2c 62 | 6b 25 2c 4e 65 78 74 42 |late%,,b|k%,NextB|
|00001fc0| 75 66 25 2c 45 6e 64 42 | 75 66 25 2c 2d 31 2c 22 |uf%,EndB|uf%,-1,"|
|00001fd0| 4f 75 74 70 75 74 22 2c | 30 20 b8 20 2c 2c 4e 65 |Output",|0 . ,,Ne|
|00001fe0| 78 74 42 75 66 25 0d 09 | 60 32 20 20 20 20 c8 99 |xtBuf%..|`2    ..|
|00001ff0| 20 57 69 6d 70 5f 43 72 | 65 61 74 65 57 69 6e 64 | Wimp_Cr|eateWind|
|00002000| 6f 77 25 2c 2c 62 6b 25 | 20 b8 20 4f 75 74 70 75 |ow%,,bk%| . Outpu|
|00002010| 74 57 69 6e 64 6f 77 25 | 0d 09 6a 4c 20 20 20 20 |tWindow%|..jL    |
|00002020| c8 99 20 57 69 6d 70 5f | 4c 6f 61 64 54 65 6d 70 |.. Wimp_|LoadTemp|
|00002030| 6c 61 74 65 25 2c 2c 62 | 6b 25 2c 4e 65 78 74 42 |late%,,b|k%,NextB|
|00002040| 75 66 25 2c 45 6e 64 42 | 75 66 25 2c 2d 31 2c 22 |uf%,EndB|uf%,-1,"|
|00002050| 49 6e 66 6f 22 2c 30 20 | b8 20 2c 2c 4e 65 78 74 |Info",0 |. ,,Next|
|00002060| 42 75 66 25 0d 09 74 2a | 20 20 20 20 c8 99 20 57 |Buf%..t*|    .. W|
|00002070| 69 6d 70 5f 43 72 65 61 | 74 65 57 69 6e 64 6f 77 |imp_Crea|teWindow|
|00002080| 25 2c 2c 62 6b 25 20 b8 | 20 49 6e 66 6f 25 0d 09 |%,,bk% .| Info%..|
|00002090| 7e 1e 20 20 20 20 c8 99 | 20 57 69 6d 70 5f 43 6c |~.    ..| Wimp_Cl|
|000020a0| 6f 73 65 54 65 6d 70 6c | 61 74 65 25 0d 09 88 19 |oseTempl|ate%....|
|000020b0| 20 20 20 20 53 74 61 74 | 65 6d 65 6e 74 73 49 63 |    Stat|ementsIc|
|000020c0| 6f 6e 25 3d 30 0d 09 92 | 56 20 20 20 20 f2 5f 49 |on%=0...|V    ._I|
|000020d0| 6e 64 69 72 65 63 74 28 | 49 6e 70 75 74 57 69 6e |ndirect(|InputWin|
|000020e0| 64 6f 77 25 2c 53 74 61 | 74 65 6d 65 6e 74 73 49 |dow%,Sta|tementsI|
|000020f0| 63 6f 6e 25 2c 50 74 72 | 53 74 61 74 65 6d 65 6e |con%,Ptr|Statemen|
|00002100| 74 73 49 63 6f 6e 25 2c | 4c 65 6e 53 74 61 74 65 |tsIcon%,|LenState|
|00002110| 6d 65 6e 74 73 49 63 6f | 6e 25 29 0d 09 9c 16 20 |mentsIco|n%).... |
|00002120| 20 20 20 53 74 75 64 65 | 6e 74 49 63 6f 6e 25 3d |   Stude|ntIcon%=|
|00002130| 31 0d 09 a6 4d 20 20 20 | 20 f2 5f 49 6e 64 69 72 |1...M   | ._Indir|
|00002140| 65 63 74 28 49 6e 70 75 | 74 57 69 6e 64 6f 77 25 |ect(Inpu|tWindow%|
|00002150| 2c 53 74 75 64 65 6e 74 | 49 63 6f 6e 25 2c 50 74 |,Student|Icon%,Pt|
|00002160| 72 53 74 75 64 65 6e 74 | 49 63 6f 6e 25 2c 4c 65 |rStudent|Icon%,Le|
|00002170| 6e 53 74 75 64 65 6e 74 | 49 63 6f 6e 25 29 0d 09 |nStudent|Icon%)..|
|00002180| b0 18 20 20 20 20 43 72 | 65 61 74 65 52 6f 41 49 |..    Cr|eateRoAI|
|00002190| 63 6f 6e 25 3d 32 0d 09 | ba 18 20 20 20 20 53 74 |con%=2..|..    St|
|000021a0| 61 66 66 4c 69 73 74 49 | 63 6f 6e 25 3d 33 0d 09 |affListI|con%=3..|
|000021b0| c4 13 20 20 20 20 51 75 | 69 74 49 63 6f 6e 25 3d |..    Qu|itIcon%=|
|000021c0| 34 0d 09 ce 13 20 20 20 | 20 49 6e 66 6f 49 63 6f |4....   | InfoIco|
|000021d0| 6e 25 3d 39 0d 09 d8 3d | 20 20 20 20 24 50 74 72 |n%=9...=|    $Ptr|
|000021e0| 53 74 61 74 65 6d 65 6e | 74 73 49 63 6f 6e 25 3d |Statemen|tsIcon%=|
|000021f0| a4 5f 52 65 61 64 5f 56 | 61 6c 28 43 6c 65 61 72 |._Read_V|al(Clear|
|00002200| 25 2c 22 52 65 73 74 24 | 43 6f 6d 6d 61 6e 64 22 |%,"Rest$|Command"|
|00002210| 29 0d 09 e2 1b 20 20 20 | 20 24 50 74 72 53 74 75 |)....   | $PtrStu|
|00002220| 64 65 6e 74 49 63 6f 6e | 25 3d 22 22 0d 09 ec 1d |dentIcon|%=""....|
|00002230| 20 20 20 20 43 75 72 72 | 65 6e 74 53 74 75 64 65 |    Curr|entStude|
|00002240| 6e 74 49 63 6f 6e 25 3d | 30 0d 09 f6 63 20 20 20 |ntIcon%=|0...c   |
|00002250| 20 f2 5f 49 6e 64 69 72 | 65 63 74 28 4f 75 74 70 | ._Indir|ect(Outp|
|00002260| 75 74 57 69 6e 64 6f 77 | 25 2c 43 75 72 72 65 6e |utWindow|%,Curren|
|00002270| 74 53 74 75 64 65 6e 74 | 49 63 6f 6e 25 2c 50 74 |tStudent|Icon%,Pt|
|00002280| 72 43 75 72 72 65 6e 74 | 53 74 75 64 65 6e 74 49 |rCurrent|StudentI|
|00002290| 63 6f 6e 25 2c 4c 65 6e | 43 75 72 72 65 6e 74 53 |con%,Len|CurrentS|
|000022a0| 74 75 64 65 6e 74 49 63 | 6f 6e 25 29 0d 0a 00 22 |tudentIc|on%)..."|
|000022b0| 20 20 20 20 24 50 74 72 | 43 75 72 72 65 6e 74 53 |    $Ptr|CurrentS|
|000022c0| 74 75 64 65 6e 74 49 63 | 6f 6e 25 3d 22 22 0d 0a |tudentIc|on%=""..|
|000022d0| 0a 14 20 20 20 20 50 61 | 75 73 65 49 63 6f 6e 25 |..    Pa|useIcon%|
|000022e0| 3d 31 0d 0a 14 1b 20 20 | 20 20 50 72 69 6e 74 53 |=1....  |  PrintS|
|000022f0| 74 75 64 65 6e 74 49 63 | 6f 6e 25 3d 32 0d 0a 1e |tudentIc|on%=2...|
|00002300| 13 20 20 20 20 53 74 6f | 70 49 63 6f 6e 25 3d 33 |.    Sto|pIcon%=3|
|00002310| 0d 0a 28 19 20 20 20 20 | 43 6f 6e 74 69 6e 75 6f |..(.    |Continuo|
|00002320| 75 73 49 63 6f 6e 25 3d | 34 0d 0a 32 1a 20 20 20 |usIcon%=|4..2.   |
|00002330| 20 53 6b 69 70 53 74 75 | 64 65 6e 74 49 63 6f 6e | SkipStu|dentIcon|
|00002340| 25 3d 37 0d 0a 3c 25 20 | 20 20 20 f2 5f 4f 70 65 |%=7..<% |   ._Ope|
|00002350| 6e 4e 65 77 57 69 6e 64 | 6f 77 28 49 6e 70 75 74 |nNewWind|ow(Input|
|00002360| 57 69 6e 64 6f 77 25 29 | 0d 0a 46 11 20 20 20 20 |Window%)|..F.    |
|00002370| f2 6f 70 65 6e 69 6e 66 | 6f 0d 0a 50 09 20 20 20 |.openinf|o..P.   |
|00002380| 20 e1 0d 0a 5a 04 0d 0a | 64 0f dd 20 f2 6f 70 65 | ...Z...|d.. .ope|
|00002390| 6e 69 6e 66 6f 0d 0a 6e | 1e 20 20 20 20 f2 5f 4f |ninfo..n|.    ._O|
|000023a0| 70 65 6e 4e 65 77 57 69 | 6e 64 6f 77 28 49 6e 66 |penNewWi|ndow(Inf|
|000023b0| 6f 25 29 0d 0a 78 13 20 | 20 20 20 49 6e 66 6f 4f |o%)..x. |   InfoO|
|000023c0| 70 65 6e 25 3d b9 0d 0a | 82 28 20 20 20 20 c8 99 |pen%=...|.(    ..|
|000023d0| 20 4f 53 5f 52 65 61 64 | 4d 6f 6e 6f 74 6f 6e 69 | OS_Read|Monotoni|
|000023e0| 63 54 69 6d 65 25 20 b8 | 20 74 69 6d 65 25 0d 0a |cTime% .| time%..|
|000023f0| 8c 1f 20 20 20 20 43 6c | 6f 73 65 54 69 6d 65 25 |..    Cl|oseTime%|
|00002400| 3d 74 69 6d 65 25 2b 31 | 30 2a 31 30 30 0d 0a 96 |=time%+1|0*100...|
|00002410| 09 20 20 20 20 e1 0d 0a | a0 04 0d 0a aa 2d dd 20 |.    ...|.....-. |
|00002420| f2 5f 49 6e 64 69 72 65 | 63 74 28 77 69 6e 64 6f |._Indire|ct(windo|
|00002430| 77 25 2c 69 63 6f 6e 25 | 2c f8 20 70 74 72 25 2c |w%,icon%|,. ptr%,|
|00002440| f8 20 6c 65 6e 25 29 0d | 0a b4 20 20 20 20 20 21 |. len%).|..     !|
|00002450| 62 6b 25 3d 77 69 6e 64 | 6f 77 25 3a 62 6b 25 21 |bk%=wind|ow%:bk%!|
|00002460| 34 3d 69 63 6f 6e 25 0d | 0a be 22 20 20 20 20 c8 |4=icon%.|.."    .|
|00002470| 99 20 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 |. Wimp_G|etIconSt|
|00002480| 61 74 65 25 2c 2c 62 6b | 25 0d 0a c8 13 20 20 20 |ate%,,bk|%....   |
|00002490| 20 70 74 72 25 3d 62 6b | 25 21 32 38 0d 0a d2 15 | ptr%=bk|%!28....|
|000024a0| 20 20 20 20 6c 65 6e 25 | 3d 62 6b 25 21 33 36 2d |    len%|=bk%!36-|
|000024b0| 32 0d 0a dc 09 20 20 20 | 20 e1 0d 0a e6 04 0d 0a |2....   | .......|
|000024c0| f0 1e dd 20 f2 5f 4f 70 | 65 6e 4e 65 77 57 69 6e |... ._Op|enNewWin|
|000024d0| 64 6f 77 28 68 61 6e 64 | 6c 65 25 29 0d 0a fa 14 |dow(hand|le%)....|
|000024e0| 20 20 20 62 6b 25 21 30 | 3d 68 61 6e 64 6c 65 25 |   bk%!0|=handle%|
|000024f0| 0d 0b 04 23 20 20 20 c8 | 99 20 57 69 6d 70 5f 47 |...#   .|. Wimp_G|
|00002500| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 25 2c 2c |etWindow|State%,,|
|00002510| 62 6b 25 0d 0b 0e 1f 20 | 20 20 c8 99 20 57 69 6d |bk%.... |  .. Wim|
|00002520| 70 5f 4f 70 65 6e 57 69 | 6e 64 6f 77 25 2c 2c 62 |p_OpenWi|ndow%,,b|
|00002530| 6b 25 0d 0b 18 08 20 20 | 20 e1 0d 0b 22 04 0d 0b |k%....  | ..."...|
|00002540| 2c 1b dd 20 f2 63 6c 6f | 73 65 77 69 6e 64 6f 77 |,.. .clo|sewindow|
|00002550| 28 68 61 6e 64 6c 65 25 | 29 0d 0b 36 13 20 20 62 |(handle%|)..6.  b|
|00002560| 6b 25 21 30 3d 68 61 6e | 64 6c 65 25 0d 0b 40 20 |k%!0=han|dle%..@ |
|00002570| 20 20 c8 99 20 57 69 6d | 70 5f 43 6c 6f 73 65 57 |  .. Wim|p_CloseW|
|00002580| 69 6e 64 6f 77 25 2c 30 | 2c 62 6b 25 0d 0b 4a 07 |indow%,0|,bk%..J.|
|00002590| 20 20 e1 0d 0b 54 04 0d | 0b 5e 17 dd f2 72 65 64 |  ...T..|.^...red|
|000025a0| 72 61 77 5f 77 69 6e 64 | 6f 77 28 71 25 29 0d 0b |raw_wind|ow(q%)..|
|000025b0| 68 0d 20 20 ea 20 6d 6f | 72 65 25 0d 0b 72 27 20 |h.  . mo|re%..r' |
|000025c0| 20 c8 99 20 57 69 6d 70 | 5f 52 65 64 72 61 77 57 | .. Wimp|_RedrawW|
|000025d0| 69 6e 64 6f 77 25 2c 2c | 71 25 20 b8 20 6d 6f 72 |indow%,,|q% . mor|
|000025e0| 65 25 0d 0b 7c 0e 20 20 | c8 95 20 6d 6f 72 65 25 |e%..|.  |.. more%|
|000025f0| 0d 0b 86 1d 20 20 20 20 | 85 20 31 2c 22 49 6e 20 |....    |. 1,"In |
|00002600| 72 65 2d 64 72 61 77 20 | 6c 6f 6f 70 22 0d 0b 90 |re-draw |loop"...|
|00002610| 29 20 20 20 20 c8 99 20 | 57 69 6d 70 5f 47 65 74 |)    .. |Wimp_Get|
|00002620| 52 65 63 74 61 6e 67 6c | 65 25 2c 2c 71 25 20 b8 |Rectangl|e%,,q% .|
|00002630| 20 6d 6f 72 65 25 0d 0b | 9a 07 20 20 ce 0d 0b a4 | more%..|..  ....|
|00002640| 05 e1 0d 0b ae 04 0d 0b | b8 18 dd 20 f2 77 69 6d |........|... .wim|
|00002650| 70 65 72 72 6f 72 28 65 | 72 72 6f 72 24 29 0d 0b |perror(e|rror$)..|
|00002660| c2 0a 20 20 20 ea 20 85 | 0d 0b cc 2c 20 20 20 f4 |..   . .|...,   .|
|00002670| 20 45 72 72 6f 72 43 6f | 64 65 25 3d 31 20 4f 4b | ErrorCo|de%=1 OK|
|00002680| 20 6f 6e 6c 79 2c 20 33 | 20 4f 4b 20 26 20 43 61 | only, 3| OK & Ca|
|00002690| 6e 63 65 6c 0d 0b d6 1b | 20 20 20 f4 20 62 75 74 |ncel....|   . but|
|000026a0| 25 20 4f 4b 3d 31 2c 43 | 41 4e 43 45 4c 3d 32 0d |% OK=1,C|ANCEL=2.|
|000026b0| 0b e0 31 20 20 20 ee 20 | 85 20 ea 20 ee 20 85 20 |..1   . |. . . . |
|000026c0| 87 3a f2 63 6c 6f 73 65 | 64 6f 77 6e 3a f6 3a f1 |.:.close|down:.:.|
|000026d0| 20 22 20 61 74 20 6c 69 | 6e 65 20 22 3b 9e 3a e0 | " at li|ne ";.:.|
|000026e0| 0d 0b ea 0a 20 20 20 ef | 20 37 0d 0b f4 33 20 20 |....   .| 7...3  |
|000026f0| 20 e7 20 9f 3d 31 20 84 | 20 9f 3d 32 37 35 34 20 | . .=1 .| .=2754 |
|00002700| 8c 20 45 72 72 6f 72 43 | 6f 64 65 25 3d 31 20 8b |. ErrorC|ode%=1 .|
|00002710| 20 45 72 72 6f 72 43 6f | 64 65 25 3d 33 0d 0b fe | ErrorCo|de%=3...|
|00002720| 0d 20 20 20 21 62 6b 25 | 3d 9f 0d 0c 08 56 20 20 |.   !bk%|=....V  |
|00002730| 20 e7 20 45 72 72 6f 72 | 43 6f 64 65 25 3d 33 20 | . Error|Code%=3 |
|00002740| 8c 20 65 72 72 6f 72 24 | 3d 65 72 72 6f 72 24 2b |. error$|=error$+|
|00002750| 22 28 22 2b c3 9e 2b 22 | 2f 22 2b c3 9f 2b 22 29 |"("+..+"|/"+..+")|
|00002760| 20 4f 4b 20 74 6f 20 63 | 61 72 72 79 20 6f 6e 2c | OK to c|arry on,|
|00002770| 20 43 41 4e 43 45 4c 20 | 74 6f 20 65 78 69 74 22 | CANCEL |to exit"|
|00002780| 0d 0c 12 16 20 20 20 24 | 28 62 6b 25 2b 34 29 3d |....   $|(bk%+4)=|
|00002790| 65 72 72 6f 72 24 0d 0c | 1c 3a 20 20 20 c8 99 20 |error$..|.:   .. |
|000027a0| 57 69 6d 70 5f 52 65 70 | 6f 72 74 45 72 72 6f 72 |Wimp_Rep|ortError|
|000027b0| 25 2c 62 6b 25 2c 45 72 | 72 6f 72 43 6f 64 65 25 |%,bk%,Er|rorCode%|
|000027c0| 2c 6d 79 74 61 73 6b 24 | 20 b8 20 2c 62 75 74 25 |,mytask$| . ,but%|
|000027d0| 0d 0c 26 33 20 20 20 e7 | 20 45 72 72 6f 72 43 6f |..&3   .| ErrorCo|
|000027e0| 64 65 25 3d 33 20 80 20 | 62 75 74 25 3d 32 20 8c |de%=3 . |but%=2 .|
|000027f0| 20 ee 20 85 20 87 3a f2 | 63 6c 6f 73 65 64 6f 77 | . . .:.|closedow|
|00002800| 6e 3a e0 0d 0c 30 08 20 | 20 20 e1 0d 0c 3a 04 0d |n:...0. |  ...:..|
|00002810| 0c 44 1e dd 20 a4 5f 52 | 65 61 64 5f 56 61 6c 28 |.D.. ._R|ead_Val(|
|00002820| 43 6c 65 61 72 25 2c 66 | 69 6e 64 24 29 0d 0c 4e |Clear%,f|ind$)..N|
|00002830| 44 20 20 20 c8 99 20 22 | 58 4f 53 5f 52 65 61 64 |D   .. "|XOS_Read|
|00002840| 56 61 72 56 61 6c 22 2c | 66 69 6e 64 24 2c 62 6b |VarVal",|find$,bk|
|00002850| 25 2c 32 35 36 20 b8 20 | 2c 2c 62 79 74 65 73 25 |%,256 . |,,bytes%|
|00002860| 20 3a f4 20 2d 3e 20 52 | 65 61 64 20 76 61 6c 75 | :. -> R|ead valu|
|00002870| 65 0d 0c 58 23 20 20 20 | e7 20 43 6c 65 61 72 25 |e..X#   |. Clear%|
|00002880| 20 8c 20 ff 28 22 55 4e | 53 45 54 20 22 2b 66 69 | . .("UN|SET "+fi|
|00002890| 6e 64 24 29 0d 0c 62 19 | 20 20 20 e7 20 62 79 74 |nd$)..b.|   . byt|
|000028a0| 65 73 25 20 3d 30 20 8c | 20 3d 20 22 22 0d 0c 6c |es% =0 .| = ""..l|
|000028b0| 14 20 20 20 62 6b 25 3f | 62 79 74 65 73 25 3d 31 |.   bk%?|bytes%=1|
|000028c0| 33 0d 0c 76 15 20 20 20 | 3d a4 73 70 61 63 65 73 |3..v.   |=.spaces|
|000028d0| 28 24 62 6b 25 29 0d 0c | 80 04 0d 0c 8a 14 dd 20 |($bk%)..|....... |
|000028e0| a4 73 70 61 63 65 73 28 | 64 61 74 61 24 29 0d 0c |.spaces(|data$)..|
|000028f0| 94 2a 20 20 20 20 c8 95 | 20 c0 64 61 74 61 24 2c |.*    ..| .data$,|
|00002900| 31 29 3d 22 20 22 3a 64 | 61 74 61 24 3d c1 64 61 |1)=" ":d|ata$=.da|
|00002910| 74 61 24 2c 32 29 3a ce | 0d 0c 9e 26 20 20 20 20 |ta$,2):.|...&    |
|00002920| c8 95 20 c2 64 61 74 61 | 24 29 3d 22 20 22 3a 64 |.. .data|$)=" ":d|
|00002930| 61 74 61 24 3d c0 64 61 | 74 61 24 29 3a ce 0d 0c |ata$=.da|ta$):...|
|00002940| a8 0e 20 20 20 20 3d 64 | 61 74 61 24 0d 0c b2 04 |..    =d|ata$....|
|00002950| 0d 0c bc 0c dd 20 f2 65 | 72 72 6f 72 0d 0c c6 0c |..... .e|rror....|
|00002960| 20 20 20 ee 20 85 20 87 | 0d 0c d0 0d 20 20 20 ef |   . . .|....   .|
|00002970| 20 32 32 2c 37 0d 0c da | 18 20 20 20 f6 3a f1 20 | 22,7...|.   .:. |
|00002980| 22 20 61 74 20 6c 69 6e | 65 20 22 3b 9e 0d 0c e4 |" at lin|e ";....|
|00002990| 08 20 20 20 e0 0d 0c ee | 04 0d 0c f8 14 dd f2 6d |.   ....|.......m|
|000029a0| 73 67 6c 6f 61 64 28 6e | 61 6d 65 24 29 0d 0d 02 |sgload(n|ame$)...|
|000029b0| 28 20 20 20 c8 99 20 22 | 4d 65 73 73 61 67 65 54 |(   .. "|MessageT|
|000029c0| 72 61 6e 73 5f 46 69 6c | 65 49 6e 66 6f 22 2c 2c |rans_Fil|eInfo",,|
|000029d0| 6e 61 6d 65 24 0d 0d 0c | 15 20 20 20 de 20 6d 73 |name$...|.   . ms|
|000029e0| 67 74 65 78 74 25 20 32 | 35 36 0d 0d 16 2f 20 20 |gtext% 2|56.../  |
|000029f0| 20 c8 99 22 4f 53 5f 4d | 6f 64 75 6c 65 22 2c 36 | .."OS_M|odule",6|
|00002a00| 2c 2c 2c 31 37 2b a9 28 | 6e 61 6d 65 24 29 b8 2c |,,,17+.(|name$).,|
|00002a10| 2c 6d 73 67 64 65 73 63 | 25 0d 0d 20 4a 20 20 20 |,msgdesc|%.. J   |
|00002a20| 24 28 6d 73 67 64 65 73 | 63 25 2b 31 36 29 3d 6e |$(msgdes|c%+16)=n|
|00002a30| 61 6d 65 24 3a c8 99 22 | 4d 65 73 73 61 67 65 54 |ame$:.."|MessageT|
|00002a40| 72 61 6e 73 5f 4f 70 65 | 6e 46 69 6c 65 22 2c 6d |rans_Ope|nFile",m|
|00002a50| 73 67 64 65 73 63 25 2c | 6d 73 67 64 65 73 63 25 |sgdesc%,|msgdesc%|
|00002a60| 2b 31 36 0d 0d 2a 08 20 | 20 20 e1 0d 0d 34 04 0d |+16..*. |  ...4..|
|00002a70| 0d 3e 10 dd a4 6d 73 67 | 30 28 74 61 67 24 29 0d |.>...msg|0(tag$).|
|00002a80| 0d 48 1c 3d a4 6d 73 67 | 34 28 74 61 67 24 2c 22 |.H.=.msg|4(tag$,"|
|00002a90| 22 2c 22 22 2c 22 22 2c | 22 22 29 0d 0d 52 04 0d |","","",|"")..R..|
|00002aa0| 0d 5c 28 dd a4 6d 73 67 | 34 28 74 61 67 24 2c 61 |.\(..msg|4(tag$,a|
|00002ab0| 72 67 31 24 2c 61 72 67 | 32 24 2c 61 72 67 33 24 |rg1$,arg|2$,arg3$|
|00002ac0| 2c 61 72 67 34 24 29 0d | 0d 66 0c ea 46 25 2c 6c |,arg4$).|.f..F%,l|
|00002ad0| 65 6e 25 0d 0d 70 58 c8 | 99 20 4d 65 73 73 61 67 |en%..pX.|. Messag|
|00002ae0| 65 54 72 61 6e 73 4c 6f | 6f 6b 75 70 25 2c 6d 73 |eTransLo|okup%,ms|
|00002af0| 67 64 65 73 63 25 2c 74 | 61 67 24 2c 6d 73 67 74 |gdesc%,t|ag$,msgt|
|00002b00| 65 78 74 25 2c 32 35 36 | 2c 61 72 67 31 24 2c 61 |ext%,256|,arg1$,a|
|00002b10| 72 67 32 24 2c 61 72 67 | 33 24 2c 61 72 67 34 24 |rg2$,arg|3$,arg4$|
|00002b20| b8 2c 2c 2c 6c 65 6e 25 | 3b 46 25 0d 0d 7a 11 e7 |.,,,len%|;F%..z..|
|00002b30| 46 25 80 20 31 8c 6c 65 | 6e 25 3d 30 0d 0d 84 1f |F%. 1.le|n%=0....|
|00002b40| 6d 73 67 74 65 78 74 25 | 3f 6c 65 6e 25 3d 31 33 |msgtext%|?len%=13|
|00002b50| 3a 3d 24 6d 73 67 74 65 | 78 74 25 0d 0d 8e 04 0d |:=$msgte|xt%.....|
|00002b60| 0d 98 04 0d 0d a2 4e 2a | 2a 2a 2a 2a 2a 2a 2a 2a |......N*|********|
|00002b70| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002b80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002b90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002ba0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002bb0| 2a 0d 0d ac 17 50 52 4f | 47 52 41 4d 20 53 54 41 |*....PRO|GRAM STA|
|00002bc0| 52 54 53 20 48 45 52 45 | 0d 0d b6 4e 2a 2a 2a 2a |RTS HERE|...N****|
|00002bd0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002be0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002bf0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002c00| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00002c10| 2a 2a 2a 2a 2a 2a 0d 0d | c0 04 0d 0d ca 15 dd 20 |******..|....... |
|00002c20| f2 6d 61 69 6e 70 72 6f | 67 28 52 6f 41 25 29 0d |.mainpro|g(RoA%).|
|00002c30| 0d d4 19 20 20 20 ea 20 | 46 6f 24 2c 53 24 2c 46 |...   . |Fo$,S$,F|
|00002c40| 69 24 2c 47 24 2c 44 24 | 0d 0d de 0a 20 20 20 ea |i$,G$,D$|....   .|
|00002c50| 20 85 0d 0d e8 32 20 20 | 20 45 6e 64 50 72 69 6e | ....2  | EndPrin|
|00002c60| 74 25 3d a3 3a 44 61 74 | 61 46 69 6c 65 25 3d a3 |t%=.:Dat|aFile%=.|
|00002c70| 3a 50 72 69 6e 74 46 69 | 6c 65 25 3d a3 3a 45 6f |:PrintFi|le%=.:Eo|
|00002c80| 46 25 3d a3 0d 0d f2 2a | 20 20 20 ee 20 85 20 ea |F%=....*|   . . .|
|00002c90| 20 f2 77 69 6d 70 65 72 | 72 6f 72 28 f6 24 29 3a | .wimper|ror(.$):|
|00002ca0| f2 65 6e 64 6d 61 69 6e | 70 72 6f 67 3a e1 0d 0d |.endmain|prog:...|
|00002cb0| fc 13 20 20 20 f2 73 6f | 75 72 63 65 44 61 74 61 |..   .so|urceData|
|00002cc0| 31 0d 0e 06 23 20 20 20 | e7 20 64 61 74 65 24 3d |1...#   |. date$=|
|00002cd0| 22 44 41 54 45 22 20 8c | 20 64 61 74 65 24 3d a4 |"DATE" .| date$=.|
|00002ce0| 64 61 74 65 0d 0e 10 46 | 20 20 20 e7 20 28 ac 20 |date...F|   . (. |
|00002cf0| 52 6f 41 25 29 20 8c 20 | 54 4d 24 3d 63 72 24 3a |RoA%) . |TM$=cr$:|
|00002d00| 4d 4d 24 3d 63 72 24 2b | 63 72 24 3a 46 46 24 3d |MM$=cr$+|cr$:FF$=|
|00002d10| 4d 4d 24 2b c4 32 30 2c | 22 2a 22 29 2b 63 72 24 |MM$+.20,|"*")+cr$|
|00002d20| 20 8b 20 46 46 24 3d bd | 31 32 0d 0e 1a 14 20 20 | . FF$=.|12....  |
|00002d30| 20 f2 5f 49 6e 69 74 50 | 72 69 6e 74 65 72 0d 0e | ._InitP|rinter..|
|00002d40| 24 17 20 20 20 f2 5f 53 | 65 74 53 74 79 6c 65 28 |$.   ._S|etStyle(|
|00002d50| 73 65 74 24 29 0d 0e 2e | 29 20 20 20 46 25 3d 8e |set$)...|)   F%=.|
|00002d60| 28 24 50 74 72 53 74 75 | 64 65 6e 74 49 63 6f 6e |($PtrStu|dentIcon|
|00002d70| 25 29 3a 44 61 74 61 46 | 69 6c 65 25 3d b9 0d 0e |%):DataF|ile%=...|
|00002d80| 38 45 20 20 20 63 72 25 | 3d 30 3a 4e 65 78 74 53 |8E   cr%|=0:NextS|
|00002d90| 74 75 64 65 6e 74 25 3d | b9 3a 53 65 6e 64 4f 75 |tudent%=|.:SendOu|
|00002da0| 74 25 3d a3 3a 43 6f 6e | 74 69 6e 75 6f 75 73 25 |t%=.:Con|tinuous%|
|00002db0| 3d a3 3a 53 6b 69 70 25 | 3d a3 3a 50 6f 6c 6c 32 |=.:Skip%|=.:Poll2|
|00002dc0| 25 3d b9 0d 0e 42 0d 20 | 20 20 f2 70 6f 6c 6c 32 |%=...B. |  .poll2|
|00002dd0| 0d 0e 4c 0f 20 20 20 50 | 6f 6c 6c 32 25 3d a3 0d |..L.   P|oll2%=..|
|00002de0| 0e 56 35 20 20 20 e7 20 | 28 ac 20 52 6f 41 25 29 |.V5   . |(. RoA%)|
|00002df0| 20 80 20 63 72 25 3e 30 | 20 8c 20 6f 75 74 70 75 | . cr%>0| . outpu|
|00002e00| 74 24 2b 3d bd 31 32 3a | f2 73 65 6e 64 4f 75 74 |t$+=.12:|.sendOut|
|00002e10| 28 31 32 29 0d 0e 60 13 | 20 20 20 f2 65 6e 64 6d |(12)..`.|   .endm|
|00002e20| 61 69 6e 70 72 6f 67 0d | 0e 6a 08 20 20 20 e1 0d |ainprog.|.j.   ..|
|00002e30| 0e 74 04 0d 0e 7e 12 dd | 20 f2 65 6e 64 6d 61 69 |.t...~..| .endmai|
|00002e40| 6e 70 72 6f 67 0d 0e 88 | 13 20 20 20 e7 20 50 6f |nprog...|.   . Po|
|00002e50| 6c 6c 32 25 20 8c 20 e1 | 0d 0e 92 42 20 20 20 e7 |ll2% . .|...B   .|
|00002e60| 20 52 6f 41 66 69 6c 65 | 25 20 8c 20 c8 99 22 4d | RoAfile|% . .."M|
|00002e70| 65 73 73 61 67 65 54 72 | 61 6e 73 5f 43 6c 6f 73 |essageTr|ans_Clos|
|00002e80| 65 46 69 6c 65 22 2c 6d | 73 67 64 65 73 63 25 3a |eFile",m|sgdesc%:|
|00002e90| 52 6f 41 66 69 6c 65 25 | 3d a3 0d 0e 9c 26 20 20 |RoAfile%|=....&  |
|00002ea0| 20 e7 20 44 61 74 61 46 | 69 6c 65 25 20 8c 20 d9 | . DataF|ile% . .|
|00002eb0| 20 23 46 25 3a 44 61 74 | 61 46 69 6c 65 25 3d a3 | #F%:Dat|aFile%=.|
|00002ec0| 0d 0e a6 2d 20 20 20 e7 | 20 50 72 69 6e 74 46 69 |...-   .| PrintFi|
|00002ed0| 6c 65 25 20 8c 20 d9 20 | 23 6f 75 74 70 75 74 25 |le% . . |#output%|
|00002ee0| 3a 50 72 69 6e 74 46 69 | 6c 65 25 3d a3 0d 0e b0 |:PrintFi|le%=....|
|00002ef0| 08 20 20 20 e1 0d 0e ba | 04 0d 0e c4 0c dd 20 f2 |.   ....|...... .|
|00002f00| 70 6f 6c 6c 32 0d 0e ce | 09 20 20 ea 20 85 0d 0e |poll2...|.  . ...|
|00002f10| d8 1a 20 20 ee 20 85 20 | ea 20 f2 77 69 6d 70 65 |..  . . |. .wimpe|
|00002f20| 72 72 6f 72 28 f6 24 29 | 0d 0e e2 07 20 20 f5 0d |rror(.$)|....  ..|
|00002f30| 0e ec 22 20 20 20 20 20 | 20 e7 20 49 6e 66 6f 4f |.."     | . InfoO|
|00002f40| 70 65 6e 25 20 8c 20 f2 | 63 6c 6f 73 65 69 6e 66 |pen% . .|closeinf|
|00002f50| 6f 0d 0e f6 25 20 20 20 | 20 20 20 c8 99 20 57 69 |o...%   |   .. Wi|
|00002f60| 6d 70 5f 50 6f 6c 6c 25 | 2c 30 2c 62 6b 25 20 b8 |mp_Poll%|,0,bk% .|
|00002f70| 20 66 6c 61 67 25 0d 0f | 00 14 20 20 20 20 20 20 | flag%..|..      |
|00002f80| c8 8e 20 66 6c 61 67 25 | 20 ca 0d 0f 0a 2b 20 20 |.. flag%| ....+  |
|00002f90| 20 20 20 20 20 20 20 c9 | 20 31 20 20 20 20 20 3a |       .| 1     :|
|00002fa0| 20 f2 72 65 64 72 61 77 | 5f 77 69 6e 64 6f 77 28 | .redraw|_window(|
|00002fb0| 21 62 6b 25 29 0d 0f 14 | 30 20 20 20 20 20 20 20 |!bk%)...|0       |
|00002fc0| 20 20 c9 20 32 20 20 20 | 20 20 3a 20 c8 99 20 57 |  . 2   |  : .. W|
|00002fd0| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 25 2c |imp_Open|Window%,|
|00002fe0| 30 2c 62 6b 25 0d 0f 1e | 29 20 20 20 20 20 20 20 |0,bk%...|)       |
|00002ff0| 20 20 c9 20 33 20 20 20 | 20 20 3a 20 f2 63 6c 6f |  . 3   |  : .clo|
|00003000| 73 65 77 69 6e 64 6f 77 | 28 21 62 6b 25 29 0d 0f |sewindow|(!bk%)..|
|00003010| 28 1f 20 20 20 20 20 20 | 20 20 20 c9 20 36 20 20 |(.      |   . 6  |
|00003020| 20 20 20 3a 20 f2 62 75 | 74 74 6f 6e 73 0d 0f 32 |   : .bu|ttons..2|
|00003030| 1f 20 20 20 20 20 20 20 | 20 20 c9 20 31 37 2c 31 |.       |  . 17,1|
|00003040| 38 20 3a 20 f2 72 65 63 | 65 69 76 65 0d 0f 3c 1a |8 : .rec|eive..<.|
|00003050| 20 20 20 20 20 20 20 20 | 20 7f 20 20 3a 20 f2 70 |        | .  : .p|
|00003060| 72 6f 63 65 73 73 0d 0f | 46 0e 20 20 20 20 20 20 |rocess..|F.      |
|00003070| 20 20 20 cb 0d 0f 50 15 | 20 20 20 20 20 20 fd 20 |   ...P.|      . |
|00003080| 45 6e 64 50 72 69 6e 74 | 25 0d 0f 5a 08 20 20 20 |EndPrint|%..Z.   |
|00003090| e1 0d 0f 64 04 0d 0f 6e | 0e dd 20 f2 70 72 6f 63 |...d...n|.. .proc|
|000030a0| 65 73 73 0d 0f 78 25 20 | 20 20 20 e7 20 4e 65 78 |ess..x% |   . Nex|
|000030b0| 74 53 74 75 64 65 6e 74 | 25 20 8c 20 f2 6e 65 78 |tStudent|% . .nex|
|000030c0| 74 73 74 75 64 65 6e 74 | 0d 0f 82 22 20 20 20 20 |tstudent|..."    |
|000030d0| e7 20 43 6f 6e 74 69 6e | 75 6f 75 73 25 20 8c 20 |. Contin|uous% . |
|000030e0| 53 65 6e 64 4f 75 74 25 | 3d b9 0d 0f 8c 46 20 20 |SendOut%|=....F  |
|000030f0| 20 20 e7 20 53 65 6e 64 | 4f 75 74 25 20 80 20 28 |  . Send|Out% . (|
|00003100| ac 20 45 6e 64 50 72 69 | 6e 74 25 29 20 8c 20 f2 |. EndPri|nt%) . .|
|00003110| 6f 75 74 70 75 74 3a 4e | 65 78 74 53 74 75 64 65 |output:N|extStude|
|00003120| 6e 74 25 3d b9 3a 53 65 | 6e 64 4f 75 74 25 3d a3 |nt%=.:Se|ndOut%=.|
|00003130| 0d 0f 96 2b 20 20 20 20 | e7 20 45 6f 46 25 20 80 |...+    |. EoF% .|
|00003140| 20 4e 65 78 74 53 74 75 | 64 65 6e 74 25 20 8c 20 | NextStu|dent% . |
|00003150| 45 6e 64 50 72 69 6e 74 | 25 3d b9 0d 0f a0 28 20 |EndPrint|%=....( |
|00003160| 20 20 20 e7 20 53 6b 69 | 70 25 20 8c 20 4e 65 78 |   . Ski|p% . Nex|
|00003170| 74 53 74 75 64 65 6e 74 | 25 3d b9 3a 53 6b 69 70 |tStudent|%=.:Skip|
|00003180| 25 3d a3 0d 0f aa 09 20 | 20 20 20 e1 0d 0f b4 04 |%=..... |   .....|
|00003190| 0d 0f be 12 dd 20 f2 6e | 65 78 74 73 74 75 64 65 |..... .n|extstude|
|000031a0| 6e 74 0d 0f c8 09 20 20 | 20 20 f5 0d 0f d2 23 20 |nt....  |  ....# |
|000031b0| 20 20 20 20 20 20 41 24 | 3d a4 67 65 74 4e 65 78 |      A$|=.getNex|
|000031c0| 74 44 61 74 61 28 22 70 | 75 70 69 6c 22 29 0d 0f |tData("p|upil")..|
|000031d0| dc 2e 20 20 20 20 20 20 | 20 fd 20 c5 20 23 46 25 |..      | . . #F%|
|000031e0| 20 84 20 28 41 24 3c 3e | 22 22 20 80 20 c0 41 24 | . (A$<>|"" . .A$|
|000031f0| 2c 34 29 3c 3e 22 46 6f | 72 6d 22 29 0d 0f e6 1a |,4)<>"Fo|rm")....|
|00003200| 20 20 20 20 e7 20 41 24 | 3c 3e 22 22 20 8c 20 f2 |    . A$|<>"" . .|
|00003210| 68 65 61 64 65 72 0d 0f | f0 18 20 20 20 20 e7 20 |header..|..    . |
|00003220| c5 20 23 46 25 20 8c 20 | 45 6f 46 25 3d b9 0d 0f |. #F% . |EoF%=...|
|00003230| fa 24 20 20 20 20 e7 20 | 45 6f 46 25 20 80 20 41 |.$    . |EoF% . A|
|00003240| 24 3d 22 22 20 8c 20 45 | 6e 64 50 72 69 6e 74 25 |$="" . E|ndPrint%|
|00003250| 3d b9 0d 10 04 09 20 20 | 20 20 e1 0d 10 0e 04 0d |=.....  |  ......|
|00003260| 10 18 19 dd 20 a4 67 65 | 74 4e 65 78 74 44 61 74 |.... .ge|tNextDat|
|00003270| 61 28 74 79 70 65 24 29 | 0d 10 22 1c 20 20 20 20 |a(type$)|..".    |
|00003280| ea 20 49 25 2c 42 24 2c | 49 43 25 2c 43 24 2c 4a |. I%,B$,|IC%,C$,J|
|00003290| 25 2c 4b 25 0d 10 2c 46 | 20 20 20 20 f5 3a 3f 64 |%,K%..,F|    .:?d|
|000032a0| 61 74 61 25 3d 9a 23 46 | 25 3a fd 20 28 3f 64 61 |ata%=.#F|%:. (?da|
|000032b0| 74 61 25 3c 3e 33 32 20 | 80 20 3f 64 61 74 61 25 |ta%<>32 |. ?data%|
|000032c0| 3c 3e 31 30 20 80 20 3f | 64 61 74 61 25 3c 3e 31 |<>10 . ?|data%<>1|
|000032d0| 33 29 20 84 20 c5 20 23 | 46 25 0d 10 36 15 20 20 |3) . . #|F%..6.  |
|000032e0| 20 20 e7 20 c5 20 23 46 | 25 20 8c 20 3d 22 22 0d |  . . #F|% . ="".|
|000032f0| 10 40 0c 20 20 20 20 49 | 25 3d 30 0d 10 4a 46 20 |.@.    I|%=0..JF |
|00003300| 20 20 20 c8 95 20 28 ac | 20 c5 20 23 46 25 29 20 |   .. (.| . #F%) |
|00003310| 80 20 3f 28 64 61 74 61 | 25 2b 49 25 29 3c 3e 31 |. ?(data|%+I%)<>1|
|00003320| 30 20 80 20 3f 28 64 61 | 74 61 25 2b 49 25 29 3c |0 . ?(da|ta%+I%)<|
|00003330| 3e 31 33 20 80 20 49 25 | 3c 4c 65 6e 44 61 74 61 |>13 . I%|<LenData|
|00003340| 25 0d 10 54 10 20 20 20 | 20 20 20 20 49 25 2b 3d |%..T.   |    I%+=|
|00003350| 31 0d 10 5e 1b 20 20 20 | 20 20 20 20 3f 28 64 61 |1..^.   |    ?(da|
|00003360| 74 61 25 2b 49 25 29 3d | 9a 23 46 25 0d 10 68 0c |ta%+I%)=|.#F%..h.|
|00003370| 20 20 20 20 20 20 20 ce | 0d 10 72 65 20 20 20 20 |       .|..re    |
|00003380| e7 20 49 25 3d 4c 65 6e | 44 61 74 61 25 20 8c 20 |. I%=Len|Data% . |
|00003390| f2 63 6c 6f 73 65 64 6f | 77 6e 3a 85 20 30 2c 22 |.closedo|wn:. 0,"|
|000033a0| 44 61 74 61 20 62 75 66 | 66 65 72 20 6f 76 65 72 |Data buf|fer over|
|000033b0| 66 6c 6f 77 2c 20 22 2b | 74 79 70 65 24 2b 22 20 |flow, "+|type$+" |
|000033c0| 64 61 74 61 20 74 6f 6f | 20 6c 6f 6e 67 20 3d 20 |data too| long = |
|000033d0| 22 2b c0 24 64 61 74 61 | 25 2c 32 30 29 0d 10 7c |"+.$data|%,20)..||
|000033e0| 16 20 20 20 20 e7 20 49 | 25 3e 30 20 8c 20 49 25 |.    . I|%>0 . I%|
|000033f0| 2d 3d 31 0d 10 86 37 20 | 20 20 20 c8 95 20 49 25 |-=1...7 |   .. I%|
|00003400| 3e 30 20 80 20 3f 28 64 | 61 74 61 25 2b 49 25 29 |>0 . ?(d|ata%+I%)|
|00003410| 3d 33 32 3a 3f 28 64 61 | 74 61 25 2b 49 25 29 3d |=32:?(da|ta%+I%)=|
|00003420| 31 33 3a 49 25 2d 3d 31 | 3a ce 0d 10 90 18 20 20 |13:I%-=1|:.....  |
|00003430| 20 20 42 24 3d 22 22 3a | 49 43 25 3d a3 3a 4b 25 |  B$="":|IC%=.:K%|
|00003440| 3d 30 0d 10 9a 13 20 20 | 20 20 e3 20 4a 25 3d 30 |=0....  |  . J%=0|
|00003450| 20 b8 20 49 25 0d 10 a4 | 1b 20 20 20 20 20 20 20 | . I%...|.       |
|00003460| c8 8e 20 3f 28 64 61 74 | 61 25 2b 4a 25 29 20 ca |.. ?(dat|a%+J%) .|
|00003470| 0d 10 ae 2c 20 20 20 20 | 20 20 20 20 20 20 20 20 |...,    |        |
|00003480| c9 20 33 34 20 3a 20 e7 | 20 49 43 25 20 8c 20 49 |. 34 : .| IC% . I|
|00003490| 43 25 3d a3 20 8b 20 49 | 43 25 3d b9 0d 10 b8 47 |C%=. . I|C%=....G|
|000034a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 c9 20 34 34 |        |    . 44|
|000034b0| 20 3a 20 e7 20 49 43 25 | 20 8c 20 42 24 2b 3d 22 | : . IC%| . B$+="|
|000034c0| 40 63 40 22 3a 4b 25 2b | 3d 33 20 8b 20 42 24 2b |@c@":K%+|=3 . B$+|
|000034d0| 3d bd 3f 28 64 61 74 61 | 25 2b 4a 25 29 3a 4b 25 |=.?(data|%+J%):K%|
|000034e0| 2b 3d 31 0d 10 c2 2c 20 | 20 20 20 20 20 20 20 20 |+=1..., |        |
|000034f0| 20 20 20 7f 20 20 20 3a | 20 42 24 2b 3d bd 3f 28 |   .   :| B$+=.?(|
|00003500| 64 61 74 61 25 2b 4a 25 | 29 3a 4b 25 2b 3d 31 0d |data%+J%|):K%+=1.|
|00003510| 10 cc 11 20 20 20 20 20 | 20 20 20 20 20 20 20 cb |...     |       .|
|00003520| 0d 10 d6 40 20 20 20 20 | 20 20 20 e7 20 4b 25 3e |...@    |   . K%>|
|00003530| 32 35 30 20 8c 20 85 20 | 31 2c 74 79 70 65 24 2b |250 . . |1,type$+|
|00003540| 22 20 64 61 74 61 20 74 | 6f 6f 20 6c 6f 6e 67 2c |" data t|oo long,|
|00003550| 20 3d 20 22 2b c0 24 64 | 61 74 61 25 2c 32 30 29 | = "+.$d|ata%,20)|
|00003560| 0d 10 e0 0f 20 20 20 20 | 20 20 20 ed 20 4a 25 0d |....    |   . J%.|
|00003570| 10 ea 0b 20 20 20 20 3d | 42 24 0d 10 f4 04 0d 10 |...    =|B$......|
|00003580| fe 0d dd 20 f2 68 65 61 | 64 65 72 0d 11 08 0f 20 |... .hea|der.... |
|00003590| 20 20 20 ea 20 6e 65 78 | 74 24 0d 11 12 0d 20 20 |   . nex|t$....  |
|000035a0| 20 20 44 24 3d 41 24 0d | 11 1c 11 20 20 20 20 46 |  D$=A$.|...    F|
|000035b0| 6f 24 3d a4 6e 65 78 74 | 0d 11 26 10 20 20 20 20 |o$=.next|..&.    |
|000035c0| 53 24 3d a4 6e 65 78 74 | 0d 11 30 11 20 20 20 20 |S$=.next|..0.    |
|000035d0| 46 69 24 3d a4 6e 65 78 | 74 0d 11 3a 10 20 20 20 |Fi$=.nex|t..:.   |
|000035e0| 20 47 24 3d a4 6e 65 78 | 74 0d 11 44 21 20 20 20 | G$=.nex|t..D!   |
|000035f0| 20 6e 65 78 74 24 3d 46 | 69 24 2b 22 20 22 2b 53 | next$=F|i$+" "+S|
|00003600| 24 2b 22 20 20 22 2b 46 | 6f 24 0d 11 4e 4c 20 20 |$+"  "+F|o$..NL  |
|00003610| 20 20 e7 20 47 24 3c 3e | 22 4d 41 4c 45 22 20 80 |  . G$<>|"MALE" .|
|00003620| 20 47 24 3c 3e 22 46 45 | 4d 41 4c 45 22 20 8c 20 | G$<>"FE|MALE" . |
|00003630| 6e 65 78 74 24 2b 3d 22 | 20 69 6e 76 61 6c 69 64 |next$+="| invalid|
|00003640| 20 67 65 6e 64 65 72 22 | 3a 43 6f 6e 74 69 6e 75 | gender"|:Continu|
|00003650| 6f 75 73 25 3d a3 0d 11 | 58 6a 20 20 20 20 f2 63 |ous%=...|Xj    .c|
|00003660| 68 61 6e 67 65 69 63 6f | 6e 28 4f 75 74 70 75 74 |hangeico|n(Output|
|00003670| 57 69 6e 64 6f 77 25 2c | 43 75 72 72 65 6e 74 53 |Window%,|CurrentS|
|00003680| 74 75 64 65 6e 74 49 63 | 6f 6e 25 2c 50 74 72 43 |tudentIc|on%,PtrC|
|00003690| 75 72 72 65 6e 74 53 74 | 75 64 65 6e 74 49 63 6f |urrentSt|udentIco|
|000036a0| 6e 25 2c 4c 65 6e 43 75 | 72 72 65 6e 74 53 74 75 |n%,LenCu|rrentStu|
|000036b0| 64 65 6e 74 49 63 6f 6e | 25 2c 6e 65 78 74 24 29 |dentIcon|%,next$)|
|000036c0| 0d 11 62 16 20 20 20 20 | 4e 65 78 74 53 74 75 64 |..b.    |NextStud|
|000036d0| 65 6e 74 25 3d a3 0d 11 | 6c 09 20 20 20 20 e1 0d |ent%=...|l.    ..|
|000036e0| 11 76 04 0d 11 80 0d dd | 20 f2 6f 75 74 70 75 74 |.v......| .output|
|000036f0| 0d 11 8a 0c 20 20 20 20 | ea 20 50 25 0d 11 94 32 |....    |. P%...2|
|00003700| 20 20 20 20 e7 20 63 72 | 25 3e 46 6f 72 63 65 46 |    . cr|%>ForceF|
|00003710| 46 25 20 8c 20 6f 75 74 | 70 75 74 24 2b 3d bd 31 |F% . out|put$+=.1|
|00003720| 32 3a f2 73 65 6e 64 4f | 75 74 28 31 32 29 0d 11 |2:.sendO|ut(12)..|
|00003730| 9e 13 20 20 20 20 6f 75 | 74 70 75 74 24 3d 4e 4d |..    ou|tput$=NM|
|00003740| 24 0d 11 a8 0f 20 20 20 | 20 41 4d 24 3d 4e 4d 24 |$....   | AM$=NM$|
|00003750| 0d 11 b2 27 20 20 20 20 | f2 70 72 69 6e 74 28 54 |...'    |.print(T|
|00003760| 4d 24 2b 46 69 24 2b 22 | 20 22 2b 53 24 2b 22 20 |M$+Fi$+"| "+S$+" |
|00003770| 20 22 2b 46 6f 24 29 0d | 11 bc 3a 20 20 20 20 f2 | "+Fo$).|..:    .|
|00003780| 70 72 69 6e 74 28 c4 4c | 4c 25 2d a9 28 46 69 24 |print(.L|L%-.(Fi$|
|00003790| 2b 22 20 22 2b 53 24 2b | 22 20 20 22 2b 46 6f 24 |+" "+S$+|"  "+Fo$|
|000037a0| 2b 41 4d 24 2b 64 61 74 | 65 24 29 2c 22 20 22 29 |+AM$+dat|e$)," ")|
|000037b0| 29 0d 11 c6 0f 20 20 20 | 20 41 4d 24 3d 4c 4d 24 |)....   | AM$=LM$|
|000037c0| 0d 11 d0 19 20 20 20 20 | f2 70 72 69 6e 74 28 64 |....    |.print(d|
|000037d0| 61 74 65 24 2b 4d 4d 24 | 29 0d 11 da 21 20 20 20 |ate$+MM$|)...!   |
|000037e0| 20 f2 70 72 69 6e 74 28 | a4 70 72 6f 63 65 73 73 | .print(|.process|
|000037f0| 28 68 65 61 64 65 72 24 | 29 29 0d 11 e4 12 20 20 |(header$|))....  |
|00003800| 20 20 4e 65 77 4c 69 6e | 65 25 3d b9 0d 11 ee 11 |  NewLin|e%=.....|
|00003810| 20 20 20 20 c8 95 20 44 | 24 3c 3e 22 22 0d 11 f8 |    .. D|$<>""...|
|00003820| 1e 20 20 20 20 20 20 20 | f2 70 72 69 6e 74 28 a4 |.       |.print(.|
|00003830| 64 65 73 63 72 69 70 74 | 6f 72 29 0d 12 02 0c 20 |descript|or).... |
|00003840| 20 20 20 20 20 20 ce 0d | 12 0c 25 20 20 20 20 f2 |      ..|..%    .|
|00003850| 70 72 69 6e 74 28 a4 70 | 72 6f 63 65 73 73 28 66 |print(.p|rocess(f|
|00003860| 6f 6f 74 65 72 24 29 2b | 46 46 24 29 0d 12 16 09 |ooter$)+|FF$)....|
|00003870| 20 20 20 20 e1 0d 12 20 | 04 0d 12 2a 13 dd 20 f2 |    ... |...*.. .|
|00003880| 70 72 69 6e 74 4f 75 74 | 28 41 25 29 0d 12 34 0c |printOut|(A%)..4.|
|00003890| 20 20 20 20 ea 20 42 24 | 0d 12 3e 16 20 20 20 20 |    . B$|..>.    |
|000038a0| 6f 75 74 70 75 74 24 2b | 3d bd 28 41 25 29 0d 12 |output$+|=.(A%)..|
|000038b0| 48 30 20 20 20 20 e7 20 | 41 25 3d 31 30 20 84 20 |H0    . |A%=10 . |
|000038c0| 41 25 3d 31 33 20 84 20 | 41 25 3d 31 32 20 8c 20 |A%=13 . |A%=12 . |
|000038d0| f2 73 65 6e 64 4f 75 74 | 28 41 25 29 3a e1 0d 12 |.sendOut|(A%):...|
|000038e0| 52 1d 20 20 20 20 e7 20 | a9 28 6f 75 74 70 75 74 |R.    . |.(output|
|000038f0| 24 29 3c 3d 4c 4c 25 20 | 8c 20 e1 0d 12 5c 0d 20 |$)<=LL% |. ...\. |
|00003900| 20 20 20 42 24 3d 22 22 | 0d 12 66 09 20 20 20 20 |   B$=""|..f.    |
|00003910| f5 0d 12 70 1a 20 20 20 | 20 20 20 20 42 24 3d c2 |...p.   |    B$=.|
|00003920| 6f 75 74 70 75 74 24 29 | 2b 42 24 0d 12 7a 1c 20 |output$)|+B$..z. |
|00003930| 20 20 20 20 20 20 6f 75 | 74 70 75 74 24 3d c0 6f |      ou|tput$=.o|
|00003940| 75 74 70 75 74 24 29 0d | 12 84 29 20 20 20 20 20 |utput$).|..)     |
|00003950| 20 20 fd 20 a9 28 6f 75 | 74 70 75 74 24 29 3c 3d |  . .(ou|tput$)<=|
|00003960| 4c 4c 25 20 80 20 c0 42 | 24 2c 31 29 3d 22 20 22 |LL% . .B|$,1)=" "|
|00003970| 0d 12 8e 14 20 20 20 20 | 6f 75 74 70 75 74 24 2b |....    |output$+|
|00003980| 3d 63 72 24 0d 12 98 14 | 20 20 20 20 f2 73 65 6e |=cr$....|    .sen|
|00003990| 64 4f 75 74 28 31 30 29 | 0d 12 a2 1a 20 20 20 20 |dOut(10)|....    |
|000039a0| 6f 75 74 70 75 74 24 3d | 49 4d 24 2b c1 42 24 2c |output$=|IM$+.B$,|
|000039b0| 32 29 0d 12 ac 09 20 20 | 20 20 e1 0d 12 b6 04 0d |2)....  |  ......|
|000039c0| 12 c0 12 dd 20 f2 73 65 | 6e 64 4f 75 74 28 41 25 |.... .se|ndOut(A%|
|000039d0| 29 0d 12 ca 0c 20 20 20 | 20 ea 20 49 25 0d 12 d4 |)....   | . I%...|
|000039e0| 17 20 20 20 20 e7 20 41 | 25 3d 31 32 20 8c 20 63 |.    . A|%=12 . c|
|000039f0| 72 25 3d 30 0d 12 de 18 | 20 20 20 20 e7 20 a9 28 |r%=0....|    . .(|
|00003a00| 6f 75 74 70 75 74 24 29 | 3e 30 20 8c 0d 12 e8 21 |output$)|>0 ....!|
|00003a10| 20 20 20 20 20 20 20 20 | 20 20 e3 20 49 25 3d 31 |        |  . I%=1|
|00003a20| 20 b8 20 a9 28 6f 75 74 | 70 75 74 24 29 0d 12 f2 | . .(out|put$)...|
|00003a30| 2e 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 d5 |.       |       .|
|00003a40| 20 23 6f 75 74 70 75 74 | 25 2c 97 28 c1 6f 75 74 | #output|%,.(.out|
|00003a50| 70 75 74 24 2c 49 25 2c | 31 29 29 0d 12 fc 16 20 |put$,I%,|1)).... |
|00003a60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 ed 20 49 |        |     . I|
|00003a70| 25 0d 13 06 40 20 20 20 | 20 20 20 20 20 20 20 e7 |%...@   |       .|
|00003a80| 20 41 25 3d 4c 69 6e 65 | 4d 61 72 6b 65 72 25 20 | A%=Line|Marker% |
|00003a90| 8c 20 63 72 25 2b 3d 31 | 3a 6f 75 74 70 75 74 24 |. cr%+=1|:output$|
|00003aa0| 3d 41 4d 24 20 8b 20 6f | 75 74 70 75 74 24 3d 22 |=AM$ . o|utput$="|
|00003ab0| 22 0d 13 10 0c 20 20 20 | 20 20 20 20 cd 0d 13 1a |"....   |    ....|
|00003ac0| 09 20 20 20 20 e1 0d 13 | 24 04 0d 13 2e 11 dd 20 |.    ...|$...... |
|00003ad0| a4 64 65 73 63 72 69 70 | 74 6f 72 0d 13 38 1d 20 |.descrip|tor..8. |
|00003ae0| 20 20 20 ea 20 41 24 2c | 42 24 2c 41 25 2c 42 25 |   . A$,|B$,A%,B%|
|00003af0| 2c 43 25 2c 41 24 28 29 | 0d 13 42 0f 20 20 20 20 |,C%,A$()|..B.    |
|00003b00| de 20 41 24 28 34 29 0d | 13 4c 13 20 20 20 20 41 |. A$(4).|.L.    A|
|00003b10| 25 3d a7 44 24 2c 22 2c | 22 29 0d 13 56 1b 20 20 |%=.D$,",|")..V.  |
|00003b20| 20 20 e7 20 41 25 3d 30 | 20 8c 20 41 25 3d a9 28 |  . A%=0| . A%=.(|
|00003b30| 44 24 29 2b 31 0d 13 60 | 1d 20 20 20 20 41 24 3d |D$)+1..`|.    A$=|
|00003b40| a4 73 70 61 63 65 73 28 | c0 44 24 2c 41 25 2d 31 |.spaces(|.D$,A%-1|
|00003b50| 29 29 0d 13 6a 14 20 20 | 20 20 44 24 3d c1 44 24 |))..j.  |  D$=.D$|
|00003b60| 2c 41 25 2b 31 29 0d 13 | 74 13 20 20 20 20 41 25 |,A%+1)..|t.    A%|
|00003b70| 3d a7 41 24 2c 22 23 22 | 29 0d 13 7e 2f 20 20 20 |=.A$,"#"|)..~/   |
|00003b80| 20 e7 20 41 25 3c 3e 30 | 20 8c 20 41 24 3d c0 41 | . A%<>0| . A$=.A|
|00003b90| 24 2c 41 25 2d 31 29 3a | f4 20 72 65 6d 6f 76 65 |$,A%-1):|. remove|
|00003ba0| 20 63 6f 6d 6d 65 6e 74 | 0d 13 88 19 20 20 20 20 | comment|....    |
|00003bb0| 41 24 3d 41 24 2b 22 3a | 3a 3a 3a 22 3a 42 25 3d |A$=A$+":|:::":B%=|
|00003bc0| 31 0d 13 92 13 20 20 20 | 20 43 25 3d a7 41 24 2c |1....   | C%=.A$,|
|00003bd0| 22 3a 22 29 0d 13 9c 12 | 20 20 20 20 e3 20 41 25 |":")....|    . A%|
|00003be0| 3d 30 20 b8 20 34 0d 13 | a6 19 20 20 20 20 20 20 |=0 . 4..|..      |
|00003bf0| 20 43 25 3d a7 41 24 2c | 22 3a 22 2c 42 25 29 0d | C%=.A$,|":",B%).|
|00003c00| 13 b0 1f 20 20 20 20 20 | 20 20 41 24 28 41 25 29 |...     |  A$(A%)|
|00003c10| 3d c1 41 24 2c 42 25 2c | 43 25 2d 42 25 29 0d 13 |=.A$,B%,|C%-B%)..|
|00003c20| ba 12 20 20 20 20 20 20 | 20 42 25 3d 43 25 2b 31 |..      | B%=C%+1|
|00003c30| 0d 13 c4 0f 20 20 20 20 | 20 20 20 ed 20 41 25 0d |....    |   . A%.|
|00003c40| 13 ce 15 20 20 20 20 e7 | 20 41 24 28 30 29 3c 3e |...    .| A$(0)<>|
|00003c50| 22 22 20 8c 0d 13 d8 3f | 20 20 20 20 20 20 20 20 |"" ....?|        |
|00003c60| 20 20 41 24 3d a4 70 72 | 6f 63 65 73 73 28 a4 6d |  A$=.pr|ocess(.m|
|00003c70| 73 67 34 28 41 24 28 30 | 29 2c 41 24 28 31 29 2c |sg4(A$(0|),A$(1),|
|00003c80| 41 24 28 32 29 2c 41 24 | 28 33 29 2c 41 24 28 34 |A$(2),A$|(3),A$(4|
|00003c90| 29 29 29 0d 13 e2 4b 20 | 20 20 20 20 20 20 20 20 |)))...K |        |
|00003ca0| 20 e7 20 41 24 3d 22 22 | 20 8c 20 41 24 3d 22 2a | . A$=""| . A$="*|
|00003cb0| 2a 20 45 52 52 4f 52 20 | 45 52 52 4f 52 20 2a 2a |* ERROR |ERROR **|
|00003cc0| 20 54 4f 4b 45 4e 20 22 | 2b 41 24 28 30 29 2b 22 | TOKEN "|+A$(0)+"|
|00003cd0| 20 4e 4f 54 20 46 4f 55 | 4e 44 20 2a 2a 22 0d 13 | NOT FOU|ND **"..|
|00003ce0| ec 0c 20 20 20 20 20 20 | 20 cc 0d 13 f6 25 20 20 |..      | ....%  |
|00003cf0| 20 20 20 20 20 20 20 20 | 41 24 3d 41 24 28 31 29 |        |A$=A$(1)|
|00003d00| 3a f4 20 6d 65 73 73 61 | 67 65 20 6f 6e 6c 79 0d |:. messa|ge only.|
|00003d10| 14 00 0c 20 20 20 20 20 | 20 20 cd 0d 14 0a 1e 20 |...     |  ..... |
|00003d20| 20 20 20 3d a4 70 72 6f | 63 65 73 73 28 a4 73 70 |   =.pro|cess(.sp|
|00003d30| 61 63 65 73 28 41 24 29 | 29 0d 14 14 04 0d 14 1e |aces(A$)|).......|
|00003d40| 12 dd 20 a4 70 72 6f 63 | 65 73 73 28 42 24 29 0d |.. .proc|ess(B$).|
|00003d50| 14 28 0c 20 20 20 20 ea | 20 41 24 0d 14 32 0d 20 |.(.    .| A$..2. |
|00003d60| 20 20 20 41 24 3d 22 22 | 0d 14 3c 09 20 20 20 20 |   A$=""|..<.    |
|00003d70| f5 0d 14 46 19 20 20 20 | 20 20 20 20 e7 20 c0 42 |...F.   |    . .B|
|00003d80| 24 2c 31 29 3d 22 40 22 | 20 8c 0d 14 50 17 20 20 |$,1)="@"| ...P.  |
|00003d90| 20 20 20 20 20 20 20 20 | f2 76 61 72 69 61 62 6c |        |.variabl|
|00003da0| 65 0d 14 5a 0c 20 20 20 | 20 20 20 20 cc 0d 14 64 |e..Z.   |    ...d|
|00003db0| 18 20 20 20 20 20 20 20 | 20 20 20 41 24 2b 3d c0 |.       |   A$+=.|
|00003dc0| 42 24 2c 31 29 0d 14 6e | 17 20 20 20 20 20 20 20 |B$,1)..n|.       |
|00003dd0| 20 20 20 42 24 3d c1 42 | 24 2c 32 29 0d 14 78 0c |   B$=.B|$,2)..x.|
|00003de0| 20 20 20 20 20 20 20 cd | 0d 14 82 12 20 20 20 20 |       .|....    |
|00003df0| 20 20 20 fd 20 42 24 3d | 22 22 0d 14 8c 0b 20 20 |   . B$=|""....  |
|00003e00| 20 20 3d 41 24 0d 14 96 | 04 0d 14 a0 0f dd 20 f2 |  =A$...|...... .|
|00003e10| 76 61 72 69 61 62 6c 65 | 0d 14 aa 0f 20 20 20 20 |variable|....    |
|00003e20| ea 20 41 25 2c 43 24 0d | 14 b4 15 20 20 20 20 41 |. A%,C$.|...    A|
|00003e30| 25 3d a7 42 24 2c 22 40 | 22 2c 32 29 0d 14 be 10 |%=.B$,"@|",2)....|
|00003e40| 20 20 20 20 e7 20 41 25 | 3d 30 20 8c 0d 14 c8 39 |    . A%|=0 ....9|
|00003e50| 20 20 20 20 20 20 20 41 | 24 2b 3d 22 20 2a 2a 2a |       A|$+=" ***|
|00003e60| 20 45 52 52 4f 52 20 2a | 2a 2a 20 45 52 52 4f 52 | ERROR *|** ERROR|
|00003e70| 20 2a 2a 2a 20 4f 4e 4c | 59 20 4f 4e 45 20 40 20 | *** ONL|Y ONE @ |
|00003e80| 2a 2a 2a 20 22 0d 14 d2 | 14 20 20 20 20 20 20 20 |*** "...|.       |
|00003e90| 42 24 3d c1 42 24 2c 32 | 29 0d 14 dc 09 20 20 20 |B$=.B$,2|)....   |
|00003ea0| 20 cc 0d 14 e6 25 20 20 | 20 20 20 20 20 41 24 2b | ....%  |     A$+|
|00003eb0| 3d a4 76 61 72 69 61 62 | 6c 65 28 c1 42 24 2c 32 |=.variab|le(.B$,2|
|00003ec0| 2c 41 25 2d 32 29 29 0d | 14 f0 17 20 20 20 20 20 |,A%-2)).|...     |
|00003ed0| 20 20 42 24 3d c1 42 24 | 2c 41 25 2b 31 29 0d 14 |  B$=.B$|,A%+1)..|
|00003ee0| fa 09 20 20 20 20 cd 0d | 15 04 09 20 20 20 20 e1 |..    ..|...    .|
|00003ef0| 0d 15 0e 04 0d 15 18 13 | dd 20 a4 76 61 72 69 61 |........|. .varia|
|00003f00| 62 6c 65 28 41 24 29 0d | 15 22 0f 20 20 20 20 c8 |ble(A$).|.".    .|
|00003f10| 8e 20 41 24 20 ca 0d 15 | 2c 20 20 20 20 20 20 20 |. A$ ...|,       |
|00003f20| 20 c9 20 22 6e 61 6d 65 | 22 20 20 20 20 20 20 20 | . "name|"       |
|00003f30| 3a 20 3d 46 69 24 0d 15 | 36 1f 20 20 20 20 20 20 |: =Fi$..|6.      |
|00003f40| 20 c9 20 22 73 6e 61 6d | 65 22 20 20 20 20 20 20 | . "snam|e"      |
|00003f50| 3a 20 3d 53 24 0d 15 40 | 38 20 20 20 20 20 20 20 |: =S$..@|8       |
|00003f60| c9 20 22 68 65 22 2c 22 | 73 68 65 22 20 20 20 3a |. "he","|she"   :|
|00003f70| 20 e7 20 47 24 3d 22 4d | 41 4c 45 22 20 8c 20 3d | . G$="M|ALE" . =|
|00003f80| 22 68 65 22 20 8b 20 3d | 22 73 68 65 22 0d 15 4a |"he" . =|"she"..J|
|00003f90| 39 20 20 20 20 20 20 20 | c9 20 22 68 69 73 22 2c |9       |. "his",|
|00003fa0| 22 68 65 72 22 20 20 3a | 20 e7 20 47 24 3d 22 4d |"her"  :| . G$="M|
|00003fb0| 41 4c 45 22 20 8c 20 3d | 22 68 69 73 22 20 8b 20 |ALE" . =|"his" . |
|00003fc0| 3d 22 68 65 72 22 0d 15 | 54 35 20 20 20 20 20 20 |="her"..|T5      |
|00003fd0| 20 c9 20 22 70 22 20 20 | 20 20 20 20 20 20 20 20 | . "p"  |        |
|00003fe0| 3a 20 e7 20 bb 28 41 24 | 28 31 29 29 3e 31 20 8c |: . .(A$|(1))>1 .|
|00003ff0| 20 3d 22 73 22 20 8b 20 | 3d 22 22 0d 15 5e 20 20 | ="s" . |=""..^  |
|00004000| 20 20 20 20 20 20 c9 20 | 22 63 72 22 20 20 20 20 |      . |"cr"    |
|00004010| 20 20 20 20 20 3a 20 3d | 63 72 24 0d 15 68 20 20 |     : =|cr$..h  |
|00004020| 20 20 20 20 20 20 c9 20 | 22 63 22 20 20 20 20 20 |      . |"c"     |
|00004030| 20 20 20 20 20 3a 20 3d | 22 2c 22 0d 15 72 20 20 |     : =|","..r  |
|00004040| 20 20 20 20 20 20 c9 20 | 22 73 70 22 20 20 20 20 |      . |"sp"    |
|00004050| 20 20 20 20 20 3a 20 3d | 22 20 22 0d 15 7c 54 20 |     : =|" "..|T |
|00004060| 20 20 20 20 20 20 7f 20 | 20 20 20 20 20 20 20 20 |      . |        |
|00004070| 3a 20 3d 22 2a 2a 2a 20 | 45 52 52 4f 52 20 2a 2a |: ="*** |ERROR **|
|00004080| 2a 20 45 52 52 4f 52 20 | 2a 2a 2a 20 56 41 52 49 |* ERROR |*** VARI|
|00004090| 41 42 4c 45 20 22 2b 41 | 24 2b 22 20 4e 4f 54 20 |ABLE "+A|$+" NOT |
|000040a0| 52 45 43 4f 47 4e 49 53 | 45 44 20 2a 2a 2a 22 0d |RECOGNIS|ED ***".|
|000040b0| 15 86 0c 20 20 20 20 20 | 20 20 cb 0d 15 90 16 20 |...     |  ..... |
|000040c0| 20 20 53 48 4f 55 4c 44 | 20 ac 20 a5 20 48 45 52 |  SHOULD| . . HER|
|000040d0| 45 0d 15 9a 04 0d 15 a4 | 10 dd 20 f2 70 72 69 6e |E.......|.. .prin|
|000040e0| 74 28 41 24 29 0d 15 ae | 0f 20 20 20 20 ea 20 49 |t(A$)...|.    . I|
|000040f0| 25 2c 42 25 0d 15 b8 13 | 20 20 20 20 e7 20 41 24 |%,B%....|    . A$|
|00004100| 3d 22 22 20 8c 20 e1 0d | 15 c2 16 20 20 20 20 e3 |="" . ..|...    .|
|00004110| 20 49 25 3d 31 20 b8 20 | a9 28 41 24 29 0d 15 cc | I%=1 . |.(A$)...|
|00004120| 1a 20 20 20 20 20 20 20 | 42 25 3d 97 28 c1 41 24 |.       |B%=.(.A$|
|00004130| 2c 49 25 2c 31 29 29 0d | 15 d6 38 20 20 20 20 20 |,I%,1)).|..8     |
|00004140| 20 20 e7 20 4e 65 77 4c | 69 6e 65 25 20 80 20 42 |  . NewL|ine% . B|
|00004150| 25 3e 3d 97 22 61 22 20 | 80 20 42 25 3c 3d 97 22 |%>=."a" |. B%<=."|
|00004160| 7a 22 20 8c 20 42 25 3d | 42 25 20 80 20 39 35 0d |z" . B%=|B% . 95.|
|00004170| 15 e0 3b 20 20 20 20 20 | 20 20 e7 20 42 25 3c 3e |..;     |  . B%<>|
|00004180| 33 32 20 80 20 42 25 3c | 3e 31 33 20 80 20 42 25 |32 . B%<|>13 . B%|
|00004190| 3c 3e 31 30 20 80 20 42 | 25 3c 3e 31 32 20 8c 20 |<>10 . B|%<>12 . |
|000041a0| 4e 65 77 4c 69 6e 65 25 | 3d a3 0d 15 ea 4a 20 20 |NewLine%|=....J  |
|000041b0| 20 20 20 20 20 f4 20 69 | 66 20 22 2e 22 20 61 74 |     . i|f "." at|
|000041c0| 20 65 6e 64 20 6f 66 20 | 6c 69 6e 65 2c 20 61 64 | end of |line, ad|
|000041d0| 64 20 61 20 73 70 61 63 | 65 20 69 6e 63 61 73 65 |d a spac|e incase|
|000041e0| 20 6e 65 77 20 73 65 6e | 74 65 6e 63 65 20 73 74 | new sen|tence st|
|000041f0| 61 72 74 73 0d 15 f4 40 | 20 20 20 20 20 20 20 e7 |arts...@|       .|
|00004200| 20 42 25 3d 97 22 2e 22 | 20 80 20 49 25 3d a9 28 | B%=."."| . I%=.(|
|00004210| 41 24 29 20 8c 20 4e 65 | 77 4c 69 6e 65 25 3d b9 |A$) . Ne|wLine%=.|
|00004220| 3a f2 70 72 69 6e 74 4f | 75 74 28 42 25 29 3a 42 |:.printO|ut(B%):B|
|00004230| 25 3d 33 32 0d 15 fe 18 | 20 20 20 20 20 20 20 f2 |%=32....|       .|
|00004240| 70 72 69 6e 74 4f 75 74 | 28 42 25 29 0d 16 08 0f |printOut|(B%)....|
|00004250| 20 20 20 20 20 20 20 ed | 20 49 25 0d 16 12 09 20 |       .| I%.... |
|00004260| 20 20 20 e1 0d 16 1c 04 | 0d 16 26 0b dd 20 a4 6e |   .....|..&.. .n|
|00004270| 65 78 74 0d 16 30 0f 20 | 20 20 20 ea 20 49 25 2c |ext..0. |   . I%,|
|00004280| 41 24 0d 16 3a 13 20 20 | 20 20 49 25 3d a7 44 24 |A$..:.  |  I%=.D$|
|00004290| 2c 22 2c 22 29 0d 16 44 | 10 20 20 20 20 e7 20 49 |,",")..D|.    . I|
|000042a0| 25 3e 30 20 8c 0d 16 4e | 17 20 20 20 20 20 20 20 |%>0 ...N|.       |
|000042b0| 41 24 3d c0 44 24 2c 49 | 25 2d 31 29 0d 16 58 17 |A$=.D$,I|%-1)..X.|
|000042c0| 20 20 20 20 20 20 20 44 | 24 3d c1 44 24 2c 49 25 |       D|$=.D$,I%|
|000042d0| 2b 31 29 0d 16 62 09 20 | 20 20 20 cc 0d 16 6c 10 |+1)..b. |   ...l.|
|000042e0| 20 20 20 20 20 20 20 41 | 24 3d 44 24 0d 16 76 10 |       A|$=D$..v.|
|000042f0| 20 20 20 20 20 20 20 44 | 24 3d 22 22 0d 16 80 09 |       D|$=""....|
|00004300| 20 20 20 20 cd 0d 16 8a | 0b 20 20 20 20 3d 41 24 |    ....|.    =A$|
|00004310| 0d 16 94 04 0d 16 9e 12 | dd 20 f2 73 6f 75 72 63 |........|. .sourc|
|00004320| 65 44 61 74 61 31 0d 16 | a8 25 20 20 20 20 f2 6d |eData1..|.%    .m|
|00004330| 73 67 6c 6f 61 64 28 24 | 50 74 72 53 74 61 74 65 |sgload($|PtrState|
|00004340| 6d 65 6e 74 73 49 63 6f | 6e 25 29 0d 16 b2 1c 20 |mentsIco|n%).... |
|00004350| 20 20 20 52 6f 41 66 69 | 6c 65 25 3d b9 3a 4d 61 |   RoAfi|le%=.:Ma|
|00004360| 6b 65 4e 6f 25 3d a3 0d | 16 bc 30 20 20 20 20 4d |keNo%=..|..0    M|
|00004370| 65 73 73 61 67 65 54 72 | 61 6e 73 4c 6f 6f 6b 75 |essageTr|ansLooku|
|00004380| 70 25 3d 4d 65 73 73 61 | 67 65 54 72 61 6e 73 5f |p%=Messa|geTrans_|
|00004390| 4c 6f 6f 6b 75 70 25 0d | 16 c6 18 20 20 20 20 74 |Lookup%.|...    t|
|000043a0| 79 70 65 24 3d a4 67 65 | 74 28 22 54 59 22 29 0d |ype$=.ge|t("TY").|
|000043b0| 16 d0 11 20 20 20 20 4d | 61 6b 65 4e 6f 25 3d b9 |...    M|akeNo%=.|
|000043c0| 0d 16 da 15 20 20 20 20 | 43 49 3d a4 67 65 74 28 |....    |CI=.get(|
|000043d0| 22 43 49 22 29 0d 16 e4 | 17 20 20 20 20 73 69 7a |"CI")...|.    siz|
|000043e0| 65 24 3d 22 2b 22 2b c3 | 28 43 49 29 0d 16 ee 20 |e$="+"+.|(CI)... |
|000043f0| 20 20 20 20 73 74 79 6c | 65 24 3d 22 2b 22 2b c3 |    styl|e$="+"+.|
|00004400| 28 a4 67 65 74 28 22 53 | 54 22 29 29 0d 16 f8 21 |(.get("S|T"))...!|
|00004410| 20 20 20 20 77 65 69 67 | 68 74 24 3d 22 2b 22 2b |    weig|ht$="+"+|
|00004420| c3 28 a4 67 65 74 28 22 | 57 54 22 29 29 0d 17 02 |.(.get("|WT"))...|
|00004430| 1a 20 20 20 20 43 50 43 | 6d 3d 43 49 2f 32 2e 35 |.    CPC|m=CI/2.5|
|00004440| 34 3a f4 20 43 50 49 0d | 17 0c 19 20 20 20 20 4c |4:. CPI.|...    L|
|00004450| 50 43 6d 3d 36 2f 32 2e | 35 34 3a f4 20 4c 50 49 |PCm=6/2.|54:. LPI|
|00004460| 0d 17 16 21 20 20 20 20 | 41 4d 24 3d c4 a4 67 65 |...!    |AM$=..ge|
|00004470| 74 28 22 41 4d 22 29 2a | 43 50 43 6d 2c 22 20 22 |t("AM")*|CPCm," "|
|00004480| 29 0d 17 20 12 20 20 20 | 20 41 4d 25 3d a9 28 41 |).. .   | AM%=.(A|
|00004490| 4d 24 29 0d 17 2a 25 20 | 20 20 20 4c 4d 24 3d c4 |M$)..*% |   LM$=.|
|000044a0| a4 67 65 74 28 22 4c 4d | 22 29 2a 43 50 43 6d 2c |.get("LM|")*CPCm,|
|000044b0| 22 20 22 29 2b 41 4d 24 | 0d 17 34 25 20 20 20 20 |" ")+AM$|..4%    |
|000044c0| 49 4d 24 3d c4 a4 67 65 | 74 28 22 49 4d 22 29 2a |IM$=..ge|t("IM")*|
|000044d0| 43 50 43 6d 2c 22 20 22 | 29 2b 41 4d 24 0d 17 3e |CPCm," "|)+AM$..>|
|000044e0| 25 20 20 20 20 4e 4d 24 | 3d c4 a4 67 65 74 28 22 |%    NM$|=..get("|
|000044f0| 4e 4d 22 29 2a 43 50 43 | 6d 2c 22 20 22 29 2b 41 |NM")*CPC|m," ")+A|
|00004500| 4d 24 0d 17 48 1f 20 20 | 20 20 4c 4c 25 3d a4 67 |M$..H.  |  LL%=.g|
|00004510| 65 74 28 22 4c 4c 22 29 | 2a 43 50 43 6d 2b 41 4d |et("LL")|*CPCm+AM|
|00004520| 25 0d 17 52 21 20 20 20 | 20 54 4d 24 3d c4 a4 67 |%..R!   | TM$=..g|
|00004530| 65 74 28 22 54 4d 22 29 | 2a 4c 50 43 6d 2c 63 72 |et("TM")|*LPCm,cr|
|00004540| 24 29 0d 17 5c 21 20 20 | 20 20 4d 4d 24 3d c4 a4 |$)..\!  |  MM$=..|
|00004550| 67 65 74 28 22 4d 4d 22 | 29 2a 4c 50 43 6d 2c 63 |get("MM"|)*LPCm,c|
|00004560| 72 24 29 0d 17 66 1b 20 | 20 20 20 46 6f 72 63 65 |r$)..f. |   Force|
|00004570| 46 46 25 3d a4 67 65 74 | 28 22 46 46 22 29 0d 17 |FF%=.get|("FF")..|
|00004580| 70 11 20 20 20 20 4d 61 | 6b 65 4e 6f 25 3d a3 0d |p.    Ma|keNo%=..|
|00004590| 17 7a 1a 20 20 20 20 20 | 20 64 61 74 65 24 3d a4 |.z.     | date$=.|
|000045a0| 67 65 74 28 22 54 52 22 | 29 0d 17 84 1c 20 20 20 |get("TR"|)....   |
|000045b0| 20 20 20 68 65 61 64 65 | 72 24 3d a4 67 65 74 28 |   heade|r$=.get(|
|000045c0| 22 48 45 22 29 0d 17 8e | 1c 20 20 20 20 20 20 66 |"HE")...|.      f|
|000045d0| 6f 6f 74 65 72 24 3d a4 | 67 65 74 28 22 46 4f 22 |ooter$=.|get("FO"|
|000045e0| 29 0d 17 98 31 20 20 20 | 20 4d 65 73 73 61 67 65 |)...1   | Message|
|000045f0| 54 72 61 6e 73 4c 6f 6f | 6b 75 70 25 3d 58 4d 65 |TransLoo|kup%=XMe|
|00004600| 73 73 61 67 65 54 72 61 | 6e 73 5f 4c 6f 6f 6b 75 |ssageTra|ns_Looku|
|00004610| 70 25 0d 17 a2 13 20 20 | 20 20 44 61 74 61 46 69 |p%....  |  DataFi|
|00004620| 6c 65 25 3d a3 0d 17 ac | 12 20 20 20 20 4e 65 77 |le%=....|.    New|
|00004630| 4c 69 6e 65 25 3d b9 0d | 17 b6 09 20 20 20 20 e1 |Line%=..|...    .|
|00004640| 0d 17 c0 04 0d 17 ca 0e | dd 20 a4 67 65 74 28 41 |........|. .get(A|
|00004650| 24 29 0d 17 d4 0f 20 20 | 20 20 ea 20 42 24 2c 41 |$)....  |  . B$,A|
|00004660| 25 0d 17 de 1d 20 20 20 | 20 42 24 3d a4 73 70 61 |%....   | B$=.spa|
|00004670| 63 65 73 28 a4 6d 73 67 | 30 28 41 24 29 29 0d 17 |ces(.msg|0(A$))..|
|00004680| e8 15 20 20 20 20 41 25 | 3d a7 42 24 2c 22 23 22 |..    A%|=.B$,"#"|
|00004690| 29 2d 31 0d 17 f2 1a 20 | 20 20 20 e7 20 41 25 3d |)-1.... |   . A%=|
|000046a0| 2d 31 20 8c 20 41 25 3d | a9 28 42 24 29 0d 17 fc |-1 . A%=|.(B$)...|
|000046b0| 1b 20 20 20 20 42 24 3d | a4 73 70 61 63 65 73 28 |.    B$=|.spaces(|
|000046c0| c0 42 24 2c 41 25 29 29 | 0d 18 06 20 20 20 20 20 |.B$,A%))|...     |
|000046d0| e7 20 4d 61 6b 65 4e 6f | 25 20 8c 20 3d bb 28 42 |. MakeNo|% . =.(B|
|000046e0| 24 29 20 8b 20 3d 42 24 | 0d 18 10 04 0d 18 1a 13 |$) . =B$|........|
|000046f0| dd 20 f2 5f 49 6e 69 74 | 50 72 69 6e 74 65 72 0d |. ._Init|Printer.|
|00004700| 18 24 2a 20 20 20 20 6f | 75 74 70 75 74 25 3d ae |.$*    o|utput%=.|
|00004710| 28 22 50 72 69 6e 74 65 | 72 3a 22 29 3a 50 72 69 |("Printe|r:"):Pri|
|00004720| 6e 74 46 69 6c 65 25 3d | b9 0d 18 2e 16 20 20 20 |ntFile%=|.....   |
|00004730| 20 72 65 73 65 74 24 3d | 22 45 53 43 2c 45 22 0d | reset$=|"ESC,E".|
|00004740| 18 38 15 20 20 20 20 63 | 6f 75 72 69 65 72 24 3d |.8.    c|ourier$=|
|00004750| 22 2b 33 22 0d 18 42 14 | 20 20 20 20 67 6f 74 68 |"+3"..B.|    goth|
|00004760| 69 63 24 3d 22 2b 36 22 | 0d 18 4c 13 20 20 20 20 |ic$="+6"|..L.    |
|00004770| 74 69 6d 65 73 24 3d 22 | 2b 35 22 0d 18 56 22 20 |times$="|+5"..V" |
|00004780| 20 20 20 57 72 61 70 41 | 72 6f 75 6e 64 24 3d 22 |   WrapA|round$="|
|00004790| 45 53 43 2c 26 2c 73 2c | 2b 30 2c 43 22 0d 18 60 |ESC,&,s,|+0,C"..`|
|000047a0| 23 20 20 20 20 4c 65 66 | 74 4d 61 72 67 69 6e 24 |#    Lef|tMargin$|
|000047b0| 3d 22 45 53 43 2c 26 2c | 61 2c 2b 31 30 2c 4c 22 |="ESC,&,|a,+10,L"|
|000047c0| 0d 18 6a 12 20 20 20 20 | c8 8e 20 74 79 70 65 24 |..j.    |.. type$|
|000047d0| 20 ca 0d 18 74 1b 20 20 | 20 20 20 20 20 c9 20 22 | ...t.  |     . "|
|000047e0| 44 4d 22 20 3a 20 73 65 | 74 24 3d 22 22 0d 18 7e |DM" : se|t$=""..~|
|000047f0| 5d 20 20 20 20 20 20 20 | c9 20 22 4c 4a 22 20 3a |]       |. "LJ" :|
|00004800| 20 73 65 74 24 3d 72 65 | 73 65 74 24 2b 22 2c 22 | set$=re|set$+","|
|00004810| 2b 57 72 61 70 41 72 6f | 75 6e 64 24 2b 22 2c 22 |+WrapAro|und$+","|
|00004820| 2b a4 5f 54 79 70 65 53 | 69 7a 65 28 63 6f 75 72 |+._TypeS|ize(cour|
|00004830| 69 65 72 24 2c 73 69 7a | 65 24 2c 77 65 69 67 68 |ier$,siz|e$,weigh|
|00004840| 74 24 2c 73 74 79 6c 65 | 24 29 0d 18 88 3e 20 20 |t$,style|$)...>  |
|00004850| 20 20 20 20 20 7f 20 3a | 20 85 20 31 2c 22 50 72 |     . :| . 1,"Pr|
|00004860| 69 6e 74 65 72 20 74 79 | 70 65 20 6e 6f 74 20 72 |inter ty|pe not r|
|00004870| 65 63 6f 67 6e 69 73 65 | 64 20 69 6e 20 21 50 72 |ecognise|d in !Pr|
|00004880| 69 6e 74 54 65 78 74 22 | 0d 18 92 0c 20 20 20 20 |intText"|....    |
|00004890| 20 20 20 cb 0d 18 9c 09 | 20 20 20 20 e1 0d 18 a6 |   .....|    ....|
|000048a0| 04 0d 18 b0 6e dd 20 a4 | 5f 54 79 70 65 53 69 7a |....n. .|_TypeSiz|
|000048b0| 65 28 74 79 70 65 24 2c | 73 69 7a 65 24 2c 77 65 |e(type$,|size$,we|
|000048c0| 69 67 68 74 24 2c 73 74 | 79 6c 65 24 29 3a 3d 22 |ight$,st|yle$):="|
|000048d0| 45 53 43 2c 28 2c 73 2c | 30 2c 70 2c 22 2b 73 69 |ESC,(,s,|0,p,"+si|
|000048e0| 7a 65 24 2b 22 2c 68 2c | 22 2b 73 74 79 6c 65 24 |ze$+",h,|"+style$|
|000048f0| 2b 22 2c 73 2c 22 2b 77 | 65 69 67 68 74 24 2b 22 |+",s,"+w|eight$+"|
|00004900| 2c 62 2c 22 2b 74 79 70 | 65 24 2b 22 2c 54 22 0d |,b,"+typ|e$+",T".|
|00004910| 18 ba 46 20 20 20 20 f4 | 20 30 2c 70 3d 66 69 78 |..F    .| 0,p=fix|
|00004920| 65 64 20 73 70 61 63 69 | 6e 67 20 20 20 2c 68 3d |ed spaci|ng   ,h=|
|00004930| 63 70 69 20 20 20 20 20 | 20 2c 73 3d 73 74 79 6c |cpi     | ,s=styl|
|00004940| 65 20 30 20 75 70 72 69 | 67 68 74 2c 20 31 20 69 |e 0 upri|ght, 1 i|
|00004950| 74 61 6c 69 63 0d 18 c4 | 04 0d 18 ce 14 dd 20 f2 |talic...|...... .|
|00004960| 5f 53 65 74 53 74 79 6c | 65 28 41 24 29 0d 18 d8 |_SetStyl|e(A$)...|
|00004970| 1a 20 20 20 ea 20 42 24 | 2c 53 25 2c 45 25 2c 4c |.   . B$|,S%,E%,L|
|00004980| 25 2c 42 25 2c 49 25 0d | 18 e2 2a 20 20 20 f4 20 |%,B%,I%.|..*   . |
|00004990| 2b 20 66 6f 72 20 6e 75 | 6d 62 65 72 73 2c 20 2b |+ for nu|mbers, +|
|000049a0| 20 6f 6e 20 69 74 73 20 | 6f 77 6e 20 66 6f 72 20 | on its |own for |
|000049b0| 2b 0d 18 ec 16 20 20 20 | 53 25 3d 31 3a 4c 25 3d |+....   |S%=1:L%=|
|000049c0| a9 28 41 24 29 2b 31 0d | 18 f6 08 20 20 20 f5 0d |.(A$)+1.|...   ..|
|000049d0| 19 00 18 20 20 20 20 20 | 20 45 25 3d a7 41 24 2c |...     | E%=.A$,|
|000049e0| 22 2c 22 2c 53 25 29 0d | 19 0a 18 20 20 20 20 20 |",",S%).|...     |
|000049f0| 20 e7 20 45 25 3d 30 20 | 8c 20 45 25 3d 4c 25 0d | . E%=0 |. E%=L%.|
|00004a00| 19 14 1a 20 20 20 20 20 | 20 42 24 3d c1 41 24 2c |...     | B$=.A$,|
|00004a10| 53 25 2c 45 25 2d 53 25 | 29 0d 19 1e 1f 20 20 20 |S%,E%-S%|)....   |
|00004a20| 20 20 20 e7 20 42 24 3d | 22 45 53 43 22 20 8c 20 |   . B$=|"ESC" . |
|00004a30| 42 24 3d bd 28 32 37 29 | 0d 19 28 22 20 20 20 20 |B$=.(27)|..("    |
|00004a40| 20 20 e7 20 c0 42 24 2c | 31 29 3d 22 2b 22 20 80 |  . .B$,|1)="+" .|
|00004a50| 20 a9 28 42 24 29 3e 31 | 20 8c 0d 19 32 3b 20 20 | .(B$)>1| ...2;  |
|00004a60| 20 20 20 20 20 20 20 20 | 20 20 e3 20 49 25 3d 32 |        |  . I%=2|
|00004a70| 20 b8 20 a9 28 42 24 29 | 3a d5 20 23 6f 75 74 70 | . .(B$)|:. #outp|
|00004a80| 75 74 25 2c 97 28 c1 42 | 24 2c 49 25 2c 31 29 29 |ut%,.(.B|$,I%,1))|
|00004a90| 3a ed 20 49 25 0d 19 3c | 0e 20 20 20 20 20 20 20 |:. I%..<|.       |
|00004aa0| 20 20 cc 0d 19 46 20 20 | 20 20 20 20 20 20 20 20 |  ...F  |        |
|00004ab0| 20 20 20 d5 20 23 6f 75 | 74 70 75 74 25 2c 97 28 |   . #ou|tput%,.(|
|00004ac0| 42 24 29 0d 19 50 0e 20 | 20 20 20 20 20 20 20 20 |B$)..P. |        |
|00004ad0| cd 0d 19 5a 11 20 20 20 | 20 20 20 53 25 3d 45 25 |...Z.   |   S%=E%|
|00004ae0| 2b 31 0d 19 64 11 20 20 | 20 20 20 20 fd 20 45 25 |+1..d.  |    . E%|
|00004af0| 3d 4c 25 0d 19 6e 0b 20 | 20 20 20 20 20 e1 0d 19 |=L%..n. |     ...|
|00004b00| 78 04 0d 19 82 0b dd 20 | a4 64 61 74 65 0d 19 8c |x...... |.date...|
|00004b10| 15 20 20 20 20 c8 8e 20 | c1 91 24 2c 38 2c 33 29 |.    .. |..$,8,3)|
|00004b20| 20 ca 0d 19 96 2a 20 20 | 20 20 20 20 20 c9 20 22 | ....*  |     . "|
|00004b30| 4a 61 6e 22 20 3a 20 3d | 22 4a 61 6e 75 61 72 79 |Jan" : =|"January|
|00004b40| 20 22 2b c1 91 24 2c 31 | 32 2c 34 29 0d 19 a0 2b | "+..$,1|2,4)...+|
|00004b50| 20 20 20 20 20 20 20 c9 | 20 22 46 65 62 22 20 3a |       .| "Feb" :|
|00004b60| 20 3d 22 46 65 62 72 75 | 61 72 79 20 22 2b c1 91 | ="Febru|ary "+..|
|00004b70| 24 2c 31 32 2c 34 29 0d | 19 aa 28 20 20 20 20 20 |$,12,4).|..(     |
|00004b80| 20 20 c9 20 22 4d 61 72 | 22 20 3a 20 3d 22 4d 61 |  . "Mar|" : ="Ma|
|00004b90| 72 63 68 20 22 2b c1 91 | 24 2c 31 32 2c 34 29 0d |rch "+..|$,12,4).|
|00004ba0| 19 b4 28 20 20 20 20 20 | 20 20 c9 20 22 41 70 72 |..(     |  . "Apr|
|00004bb0| 22 20 3a 20 3d 22 41 70 | 72 69 6c 20 22 2b c1 91 |" : ="Ap|ril "+..|
|00004bc0| 24 2c 31 32 2c 34 29 0d | 19 be 26 20 20 20 20 20 |$,12,4).|..&     |
|00004bd0| 20 20 c9 20 22 4d 61 79 | 22 20 3a 20 3d 22 4d 61 |  . "May|" : ="Ma|
|00004be0| 79 20 22 2b c1 91 24 2c | 31 32 2c 34 29 0d 19 c8 |y "+..$,|12,4)...|
|00004bf0| 27 20 20 20 20 20 20 20 | c9 20 22 4a 75 6e 22 20 |'       |. "Jun" |
|00004c00| 3a 20 3d 22 4a 75 6e 65 | 20 22 2b c1 91 24 2c 31 |: ="June| "+..$,1|
|00004c10| 32 2c 34 29 0d 19 d2 27 | 20 20 20 20 20 20 20 c9 |2,4)...'|       .|
|00004c20| 20 22 4a 75 6c 22 20 3a | 20 3d 22 4a 75 6c 79 20 | "Jul" :| ="July |
|00004c30| 22 2b c1 91 24 2c 31 32 | 2c 34 29 0d 19 dc 29 20 |"+..$,12|,4)...) |
|00004c40| 20 20 20 20 20 20 c9 20 | 22 41 75 67 22 20 3a 20 |      . |"Aug" : |
|00004c50| 3d 22 41 75 67 75 73 74 | 20 22 2b c1 91 24 2c 31 |="August| "+..$,1|
|00004c60| 32 2c 34 29 0d 19 e6 2c | 20 20 20 20 20 20 20 c9 |2,4)...,|       .|
|00004c70| 20 22 53 65 70 22 20 3a | 20 3d 22 53 65 70 74 65 | "Sep" :| ="Septe|
|00004c80| 6d 62 65 72 20 22 2b c1 | 91 24 2c 31 32 2c 34 29 |mber "+.|.$,12,4)|
|00004c90| 0d 19 f0 2a 20 20 20 20 | 20 20 20 c9 20 22 4f 63 |...*    |   . "Oc|
|00004ca0| 74 22 20 3a 20 3d 22 4f | 63 74 6f 62 65 72 20 22 |t" : ="O|ctober "|
|00004cb0| 2b c1 91 24 2c 31 32 2c | 34 29 0d 19 fa 2b 20 20 |+..$,12,|4)...+  |
|00004cc0| 20 20 20 20 20 c9 20 22 | 4e 6f 76 22 20 3a 20 3d |     . "|Nov" : =|
|00004cd0| 22 4e 6f 76 65 6d 62 65 | 72 20 22 2b c1 91 24 2c |"Novembe|r "+..$,|
|00004ce0| 31 32 2c 34 29 0d 1a 04 | 2b 20 20 20 20 20 20 20 |12,4)...|+       |
|00004cf0| c9 20 22 44 65 63 22 20 | 3a 20 3d 22 44 65 63 65 |. "Dec" |: ="Dece|
|00004d00| 6d 62 65 72 20 22 2b c1 | 91 24 2c 31 32 2c 34 29 |mber "+.|.$,12,4)|
|00004d10| 0d 1a 0e 38 20 20 20 20 | 20 20 20 7f 20 20 3a 20 |...8    |   .  : |
|00004d20| 85 20 31 2c 22 45 72 72 | 6f 72 20 69 6e 20 46 4e |. 1,"Err|or in FN|
|00004d30| 64 61 74 65 2c 20 64 72 | 6f 70 70 65 64 20 6f 75 |date, dr|opped ou|
|00004d40| 74 20 62 61 64 6c 79 22 | 0d 1a 18 0c 20 20 20 20 |t badly"|....    |
|00004d50| 20 20 20 cb 0d ff       |                         |   ...  |        |
+--------+-------------------------+-------------------------+--------+--------+